RosettaCodeData/Task/Averages-Mode/Mathematica/averages-mode.math
2023-07-01 13:44:08 -04:00

2 lines
65 B
Text

Commonest[{b, a, c, 2, a, b, 1, 2, 3}]
Commonest[{1, 3, 2, 3}]