一、二項分佈

二項分佈Binomial(5,b)圖

> k=seq(0.1,0.9,0.1)
> par(mfrow=c(3,3),mai=c(0.6,0.5,0.2,0.1))
> for (i in 1:9) {
+     barplot(dbinom(0:5,5,k[i]),xlab = "x",ylab = "p",ylim = c(0,.6),main = substitute(B(5,b),list(b=k[i])),col = "lightblue")
+ }

計算二項分佈的概率

# 計算沒有不合格品的概率
> dbinom(0,5,0.06)
[1] 0.733904

# 恰好一個不合格品的概率
> dbinom(1,5,0.06)
[1] 0.2342247

# 有三個以下不合格品的概率
> pbinom(3,5,0.06)
[1] 0.9999383

明天繼續更新。。。