RosettaCodeData/Task/Probabilistic-choice/Mathematica/probabilistic-choice-2.math

2 lines
62 B
Plaintext

Grid[{#[[1]],N[Count[data,#[[1]]]/10^6],N[#[[2]]]}&/@choices]