MikuHatsune https://blog.hatena.ne.jp/MikuHatsune/ 驚異のアニヲタ社会復帰の予備 https://mikuhatsune.hatenadiary.com/ R 数学いらずの医科統計学 統計 医学 こちらから。 poisson.conf <- function(x, conf=0.95){ N2 <- length(x)*2 df <- 2*sum(x)+2 alpha2 <- (1-conf)/2 return(qchisq(c(alpha2, 1-alpha2), df)/N2) } n<- 100 poisCI<- matrix(0,n+1,2) dimnames(poisCI)<- list(0:n,c("lower","upper")) for(i in 0:n){ poisCI[i+1,]<- poisson.conf(i) } 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmikuhatsune.hatenadiary.com%2Fentry%2F20110927%2F1317021033" title="ポアソン定数の信頼区間 - 驚異のアニヲタ社会復帰の予備" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2011-09-27 16:10:33 rich https://mikuhatsune.hatenadiary.com/entry/20110927/1317021033 1.0 100%