高校数学の質問スレ(医者・東大卒専用) Part438 (991レス)
上下前次1-新
抽出解除 レス栞
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
564(1): 01/14(火)20:19 ID:KG5WXTP4(1) AAS
太郎くんと花子さんが一緒に食事をしてノロウイルスのいる生牡蠣を食べたとする。
画像リンク
のデータから太郎くんと花子さんが同じ日に発症する確率を求めなさい。
算出に必要な条件は適宜設定してよい、すなわち、好みの方法で計算してよい。
算出例:incubation periodがどんな分布に従うかを前提にしないで乱数発生させて算出。
R言語
calc=\(){
noro=c(
runif(2,21,24),
runif(2,25,28),
runif(16,29,32),
runif(16,33,36),
runif(14,37,40),
runif(2,41,44),
runif(5,45,48))
abs(diff(sample(noro,2,replace = TRUE))) < 24
}
mean(replicate(1e6,calc()))
Wolfram言語
calc[] := Module[{noro},
noro := Flatten@{
Table[Random[Real,{21,24}], 2],
Table[Random[Real,{25,28}], 2],
Table[Random[Real,{29,32}],16],
Table[Random[Real,{33,36}],16],
Table[Random[Real,{37,40}],14],
Table[Random[Real,{41,24}], 2],
Table[Random[Real,{45,48}], 5]};
(Abs@Differences@RandomChoice[noro,2])[[1]] < 24 // Boole
]
Table[calc[],10^6] // Mean // N
565(1): 01/14(火)22:49 ID:DQ0smkUQ(1) AAS
>>564
寝ても覚めてもレス乞食って虚しくないのかよ
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.043s