Mathematica 中的无重复组合答案

【问题标题】：Combination without repetition in MathematicaMathematica 中的无重复组合
【发布时间】：2011-11-25 22:34:30
【问题描述】：

我怎样才能获得从Range[96] 中抽取的两个不同元素的 48 对不重复的随机对？也就是说这96个元素只使用一次。

虽然我尝试将 Tuples/Subsets 与 Select 结合使用，但我觉得必须有更直接的方法来实现这一点。

【问题讨论】：

【解决方案1】：

请告诉我这是否正确：

Partition[RandomSample@Range@96, 2]

【讨论】：

【解决方案2】：

Partition[RandomSample[Range[96]],2]

【讨论】：

我不需要竞争 :) 在mathematica中尝试过并粘贴到这里
一直在发生。没关系。你以前有没有在这里（Mathematica 标记）环顾四周？
有空的时候看看这个codegolf.stackexchange.com/q/3277/2208
@Sjoerd，您对以上内容有何看法？
@500 代码高尔夫？不错的代码。 Mathematica 有自动缩进，所以我不知道它会如何交互。 Prashant：你真的应该更经常地来这里检查一下。你会喜欢这里的。