基于RStudio实现随机变量的概率分布

一、二项分布

二项分布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

　

明天继续更新。。。