-- 等概率随机排列数组
function g_fn_shuffle( arr )
if arr == nil then
return
elseif #arr <= 1 then
return
end
for i=#arr,1,-1 do
local j = math.random(i)
local value = arr[i]
arr[i] = arr[j]
arr[j] = value
end
end
------------------

的 ，

这个函数的作用就是把一个表随机打乱，通俗地说就是“洗牌程序”。
但是这个短短的十多行的小程序，却有一个严重算法错误，以及几个可以吐槽的地方，可以看出作者编程经验欠缺，lua也不熟悉。

也说一下算法错误，算法本意是用循环顺序将每一张牌和一个随机的牌交换位置，以达到洗牌的目的。作者可能想将已经处理过的位置不再被随机，但是这种算法首先不符合实际，大家想一下实际洗牌的时候你会去刻意保证洗过的牌不再改变位置吗？其次，越到后面的牌可以随机的位置越少，而到了第一张牌（作者用的倒序），random的范围也是1，根本没得选，位置根本不会变。
所以，这个算法应该改成：无论哪张牌，可以随机的位置都是整副牌。

再说说可以吐槽的地方。
首先：第一个if语句，是判断表为空返回；而第二个elseif，是判断表项数<=1返回。第二个判断完全包容了第一个判断，因此第一个判断是不需要的。
其次：交换两个数组元素，作者的写法在任何语言中都是对的，但是在lua中有更简明的方法： a,b = b,a ，这样就简单交换了两个变量的值。

程序改写如下：
function g_fn_shuffle( arr )
if #arr <= 1 then return end
for i=1,#arr do
local j = math.random(#arr)
arr[i],arr[j] = arr[j],arr[i]
end
end

好吧，被打脸了，首先承认自己孤陋寡闻。
wiki了一下，发现这是一个改进过的fisher kate shuffle算法：
The modern version of the Fisher–Yates shuffle, designed for computer use, was introduced by Richard Durstenfeld...
算法描述如下：
这确实是一个完美的、绝对等概率的洗牌算法。不过现实中不存在完美的洗牌，而且洗得越均匀越不容易出“大牌”，所以自己写应用是否要照抄需要权衡一下。
后头观察一下算法描述，它是0到n-1的数组（c语言表述法，下标从0开始），下行到1为止。转换为lua语言，应该是从#arr到2为止，而不是1。
所以，我依然要鄙视楼主的这个程序，抄都抄错！
最后@霞虫