Lua 有一个非常小的库,因此您必须编写自己的函数来执行许多其他语言自动提供的一些任务。
解决这个问题的一个好方法是编写小函数来解决部分问题,并将它们合并到最终解决方案中。在这里,最好有一个数字范围,其中某些数字被排除在外,从中随机抽取一个数字。使用range函数可以获得范围:
-- Returns a sequence containing the range [a, b].
function range (a, b)
local r = {}
for i = a, b do
r[#r + 1] = i
end
return r
end
要获得排除了某些数字的序列,可以编写seq_diff 函数;这个版本使用了member 函数:
-- Returns true if x is a value in the table t.
function member (x, t)
for k, v in pairs(t) do
if v == x then
return true
end
end
return false
end
-- Returns the sequence u - v.
function seq_diff (u, v)
local result = {}
for _, x in ipairs(u) do
if not member(x, v) then
result[#result + 1] = x
end
end
return result
end
最后这些较小的功能可以组合成一个解决方案:
-- Returns a random number from the range [a, b],
-- excluding numbers in the sequence seq.
function random_from_diff_range (a, b, seq)
local selections = seq_diff(range(a, b), seq)
return selections[math.random(#selections)]
end
示例交互:
> for i = 1, 20 do
>> print(random_from_diff_range(1, 8, {1, 4, 3}))
>> end
8
6
8
5
5
8
6
7
8
5
2
5
5
7
2
8
7
2
6
5