对给定的连续五年进行概率模拟
现在,请使用上一题的 check_for_five 函数,模拟 10000 次连续五年的情形,来了解 Ronnie Bardah 连续 5 年进入奖金圈这一成就有多罕见。同样地,我们假设共有 6000 名选手,其中每年有 10%(即 600 名)能进入奖金圈。
本练习是课程的一部分
R 中的概率谜题
练习说明
- 生成一个矩阵,记录连续 5 年中每一年进入奖金圈的选手。注意,总共有 6000 名选手,其中每年有 600 名会进入奖金圈。
- 填写条件,判断是否有任一选手在所有 5 年里都进入了奖金圈。
交互式实操练习
通过完成这段示例代码来试试这个练习。
players <- c(1:6000)
count <- 0
for(i in 1:10000){
# Create matrix of cashing players
cashes <- ___
# Check for five time winners
if(___){
count <- count + 1
}
}
print(count/10000)