RosettaCodeData/Task/Probabilistic-choice/Mathematica/probabilistic-choice-1.math
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

2 lines
194 B
Text

choices={{"aleph", 1/5},{"beth", 1/6},{"gimel", 1/7},{"daleth", 1/8},{"he", 1/9},{"waw", 1/10},{"zayin", 1/11},{"heth", 1759/27720}};
data=RandomChoice[choices[[All,2]]->choices[[All,1]],10^6];