Monty Hall problem: Difference between revisions

m
Line 1,700:
=={{header|Mathematica}}==
 
<lang Mathematica> montyHall[g_nGames_] :=
Module[{r, winningDoors, firstChoices, nStayWins, stayWinPercent, nSwitchWins},
r := RandomInteger[{1, 3}, nGames];