RosettaCodeData/Task/Sum-to-100/Mathematica/sum-to-100-3.math
2023-07-01 13:44:08 -04:00

1 line
47 B
Text

MaximalBy[Counts@ToExpression@sums, Identity]