Question

4．已知RandomInteger[10]在Mathematica中可以产生一个服从均匀分布的在0、10间取值的随机整数

4．已知在Mathematica中可以产生一个服从均匀分布的在0、10间取值的随机整数，据此，请你给出计算机“洗牌”的模拟程序。

Answer 1

翻了下帮助，这个应该用RandomSample更好：

RandomSample[Flatten[{ConstantArray[#, 4] & /@ {Range[2, 10], {J, Q, K, A}}, xiaowang, dawang}], 54]

Answer 2

给你三个例子。

随机[房地产]

随机[整数]

随机[复杂]

括号内的范围内，可以很容易地调整。