高校数学の質問スレ（医者・東大卒専用） Part438 (979ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

564: １３２人目の素数さん [sage] 2025/01/14(火) 20:19:32.39 ID:KG5WXTP4 太郎くんと花子さんが一緒に食事をしてノロウイルスのいる生牡蠣を食べたとする。 https://i.imgur.com/lro8LGD.png のデータから太郎くんと花子さんが同じ日に発症する確率を求めなさい。 算出に必要な条件は適宜設定してよい、すなわち、好みの方法で計算してよい。 算出例：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 http://rio2016.5ch.net/test/read.cgi/math/1723152147/564

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.030s