计算思路，其中80% 长度不小于3米，即长度大于3米的概率为0.8，长度小于3米的概率为0.2，100根中至少有30根长度低于3米的概率，也就是1-长度低于3米的最多有29根的概率
1- 求和（i=0：29）(C_100^i)(0.8)^(100-i)*0.2^i = 1- 0.988751=0.01124898
这个计算过程可以用编程语言实现，以下是R语言的程序，请参考。
m=0
for (i in 0:29){
k=choose(100,i)*0.8^(100-i)*0.2^(i)
m=k+m
}
1-m
如果这个函数本身返回的东西是一个list，那我们可以用$符号来提取，举例如下：sum_and_mean = function(a,b){
sum = a+b
mean = (a+b)/2
return(list(sum = sum, mean = mean))
}
# 当我们call这个function的时候
sum_and_mean(2,4)$sum # 结果等于6
sum_and_mean(2,4)$mean # 结果等于3希望对你有帮助！
即随机抽样。sample(x, size, replace = FALSE, prob = NULL)replace=F,表示不重复抽样replace=T 表示可以重复抽样x=1:5sample(x,6,replace=T) #重复抽样[1] 1 2 1 4 4 3sample(x,2,replace=F) #不重复[1] 4 5
