>>937
> mean(replicate(1e4,sim(100,80))) # 1万回繰り返して平均を求める
[1] 158.953