高校数学の質問スレPart407at MATH高校数学の質問スレPart407 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト850:132人目の素数さん 20/09/29 15:05:28.22 Z2NNaelm.net 誰か教えて https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q13232300193?fr=and_other 851:132人目の素数さん 20/09/29 16:27:19.04 SJIp1RF6.net >>800 理解できるわ 場合わけとかめんどくさい土方みたいなことやらせるなってこと 852:132人目の素数さん 20/09/29 21:01:13.44 a1+Kawn1.net >>803 (1)目の出方を全部書き出して数える (2)100万回くらいサイコロを投げて数える 853:132人目の素数さん 20/09/29 21:29:02.84 a1+Kawn1.net >>815 やってみた。 > # 総当たり > dice4 <- function(num, N=6, digit = 4){ + r=num%%N + q=num%/%N + while(q > 0 | digit > 1){ + r=append(q%%N,r) + q=q%/%N + digit=digit-1 + } + return(r+1) + } > > re=0 > for(i in 0:(6^4-1)){ + d=dice4(i) + re <- re + (sum(d==6)>=2) # 2個以上6の目があるか? + } > re [1] 171 > 6^4 [1] 1296 > 171/1296 [1] 0.1319444 > > # 1億回シミュレーション > mean(rbinom(1e8,4,1/6)>=2) [1] 0.1319338 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch