MikuHatsune https://blog.hatena.ne.jp/MikuHatsune/ 驚異のアニヲタ社会復帰の予備 https://mikuhatsune.hatenadiary.com/ R 数学 こんな問題があったのでRを使って解く。 1円支払うと1回引けるクジがあり、1/6の確率で当たると7円貰えるが外れると何も貰えない。このクジを複数回連続で引く時、最終的な収支が±0円以上である確率が95%を超えるのは、クジを何回引く時か。 クジを回引くとき、それぞれについてシミュレーションを十分回行なって、確率が十分に収束しているという感じで、並列化も交えてやってみる。 #一回シミュレーションを行うと、引く回数が1~N回の時の収支>=0かどうかを返す関数。 #収支>=0なら1，<0なら0が返ってくる。 #snowによる並列計算は、引き渡す関数内にすべての変数を収めておくのがいいっぽい。 fn <… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmikuhatsune.hatenadiary.com%2Fentry%2F20120801%2F1343485978" title="もう数式ガリガリいじって解く力がなくなっている - 驚異のアニヲタ社会復帰の予備" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.d.st-hatena.com/diary/MikuHatsune/2012-08-01.png Hatena Blog https://hatena.blog 2012-08-01 23:32:58 rich https://mikuhatsune.hatenadiary.com/entry/20120801/1343485978 1.0 100%