前一段时间，有同事问Erlang中如何实现将一个列表中元素打乱，我第一反应就是每次根据列表长度随机出一个下标，将该元素剔出列表，加入到新列表中，重复上面步骤至原列表为空即可。没过多久一个同事说，直接给每个元素一个随机值，然后排序一下就可以了。其实游戏中经常会遇到这种需要打乱顺序的情况，例如洗牌，网上搜寻了一番，发现了些做法。

参考  中的

版本1（速度快，随机化不好）：

shuffle_v1(L) ->List1 = [{random:uniform(), X} || X <- L],List2 = lists:keysort(1, List1),[E || {_, E} <- List2].

上面的版本2 代码不少，是叫Fisher-Yates shuffle算法，根据中描述，跟我开始想的方法差不多，但原算法涉及到数组的元素交换，我个人感觉erlang的list在这方面不太方便，果然有更加简洁的方案，

shuffle(List) -> shuffle(List, []).shuffle([], Acc) -> Acc;shuffle(List, Acc) ->{Leading, [H | T]} = lists:split(random:uniform(length(List)) - 1, List),shuffle(Leading ++ T, [H | Acc]).

 当然原算法进行数组的元素交换，只需要一个临时变量即可完成随机数组的生成，特别当数组长度很大的情况下，能节省不少内存。