Monty Hall problem: Difference between revisions

Content added Content deleted
mNo edit summary
Line 1,773: Line 1,773:
stayWin=. =/@}.
stayWin=. =/@}.
switchWin=. pick@(x -. }:) = {:
switchWin=. pick@(x -. }:) = {:
r=.(stayWin,switchWin)@scenario"0 i.1000
r=.(stayWin,switchWin)@scenario"0 i.y
labels=. ];.2 'limit stay switch '
labels=. ];.2 'limit stay switch '
smoutput labels,.":"0 y,+/r
smoutput labels,.":"0 y,+/r