RosettaCodeData/Task/Combinations/Mathematica/combinations-1.math

2 lines
93 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
combinations[n_Integer, m_Integer]/;m>= 0:=Union[Sort /@ Permutations[Range[0, n - 1], {m}]]