Re: probability with simulation

*To*: mathgroup at smc.vnet.net*Subject*: [mg60507] Re: probability with simulation*From*: Bill Rowe <readnewsciv at earthlink.net>*Date*: Mon, 19 Sep 2005 04:45:28 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

On 9/18/05 at 1:15 AM, ma_sara177 at hotmail.com (Sara) wrote: >I have a problem with probability. I have to solve a problem av >probability with simulation. i have done it with the combinatorial >method but I dont know how to use Mathematica to solve the problem >with simulation. can any one Help me please. If you want my result >with combinatorial method or my try with simulation I can email >you. the problems are: >1)Find the probability of getting exactly two 1:s when throwing 5 >dices. Solve this problem with the combinatorial method and by >simulation. From what you say above, I assume the difficulty is with the Mathematica code rather than the problem itself. I can simulate a single die with Random[Integer,{1,6}] So a set of five dice could be represented as Table[Random[Integer, {1,6}],{5}] using Count to count the number of 1's in each simulate toss of 5 dice you get the following; Count[Table[Random[Integer,{1,6}],{5}],1] Finally if I wanted to simulate 1000 rolls of the 5 simulated dice and count just the number of times exactly two 1's appeared, I could do it as Count[ Table[ Count[Table[Random[Integer, {1, 6}], {5}], 1], {1000}], 2] -- To reply via email subtract one hundred and four