分からない問題はここに書いてね449

[0570 １３２人目の素数さん 2018/12/13(木) 23:02:22.86 ID:vWEXT14C]

>>555
二項分布で乱数発生させてシミュレーションを１００万やって頻度をだすと

> mean(replicate(1e6,all(abs(cumsum(0.5-rbinom(60,1,0.5))*2)<16)))
[1] 0.920739

になりました。