... p = 0.2 rbinom(500000, n, p) %>% hist(breaks=80, freq=F) curve(dnorm(x, mean=n*p, sd=sqrt(n*p*(1-p))), col='red', lwd=2, add=T).
確定! 回上一頁