erlang 洗牌 shuffle

很简单的一个场景：一副扑克(54张)的乱序洗牌

shuffle_list(List) ->
    [X || {_, X} <- lists:sort([{random:uniform(), N} || N <- List])].

1）分别54个数中，取出一个数再对应其random随机数。

2）再random随机数排序。

3）排序后，再取出对应数值 。

 

而且每次random对应的数也不一样。