[過去ﾛｸﾞ] 分からない問題はここに書いてね 470 (1002ﾚｽ)
上下前次1-新

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

798: 2022/02/22(火)07:59 ID:tajKwaMw(2/5) AA×
>>778>>0


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
798: [sage] 2022/02/22(火) 07:59:47 ID:tajKwaMw >>778 100万回のシミュレーションでは > sim <- function(a=0.8,b=0.7,c=0.6,m=4){ + A=sample(1:m,1,prob=c(a,rep((1-a)/(m-1),m-1))) + B=sample(1:m,1,prob=c(b,rep((1-b)/(m-1),m-1))) + C=sample(1:m,1,prob=c(c,rep((1-c)/(m-1),m-1))) + c(A,B,C) + } > f <- function(x){ + if(length(unique(x))==3) return(0) + else as.numeric(names(which.max(table(x)))) + } > answers=t(replicate(1e6,sim())) > re=apply(answers,1,f) > mean(re[re>0]==1) [1] 0.9065208 という結果になった。 http://rio2016.5ch.net/test/read.cgi/math/1630085480/798
万回のシミュレーションでは という結果になった

---

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

---

あと 204 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.023s