一、二项分布
二项分布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
明天继续更新。。。