底辺私立医大を卒業した医者って頭悪いよね？ Part26

935 ：卵の名無しさん ：2023/01/03(火) 18:28:48.24 ID:8qVOLZEv0.net

>>930
(1)
正規分布前提で計算すると0.130 0.172
ｔ分布を前提で計算すると0.127 0.175
中央値をつかったbootstrapで計算すると0.111 0.168

(2)のシミュレーション例
R=1e4
bp=one.boot(r/N,median,R)
pip=\() rbinom(1,1,sample(bp$t,1))
sim=\(){
a=pip()
b=pip()
i=2
while(a!=1 || b!=1){
a=b
b=pip()
i=i+1
}
return(i)
}
k=1e5
n=replicate(k,sim())
summary(n)