使用Mathematica中的Outer查找两个骰子的所有可能结果

Question

我刚开始使用Wolfram Mathematica 9，我正在尝试学习如何使用外部功能。我有一个问题，我想生成一个列表，其中包含滚动两个骰子的所有可能结果。我有以下列表开始。

numbers = { 1, 2, 3, 4, 5, 6 }

我想要生成的列表应该是以下形式。

{ { 1, 1 }, { 1, 2 }, { 1, 3 }, ..., { 6, 6 } }

我尝试过像

这样的事情

Outer[Times, numbers, numbers]

无济于事。我该如何解决这个问题？

提前谢谢！

Answer 1

如果您想坚持Outer尝试Outer[List,numbers,numbers]。

Answer 2

如上所述，还有另一种方法可以做到这一点。考虑 子集[范围[1,6]，{2}]

Answer 3

您还可以Join使用Outer[{#1}~Join~{#2},numbers,numbers]。