坚持策略的获胜概率
让我们编写代码来模拟 Monty Hall 综艺游戏。在本练习中，参赛者每次都选择第 1 号门，并始终"坚持"不换门。我们将运行 10000 次迭代，计算获胜的相对频率。
首先，只编码一次迭代。然后，将其放入一个 for 循环中反复运行，用我们之前讨论过的计数器思路来得到真实获胜概率的模拟估计。
本练习是课程的一部分
R 中的概率谜题
交互式实操练习
通过完成这段示例代码来试试这个练习。
set.seed(1)
doors <- c(1,2,3)
# Randomly select one of the doors to have the prize
prize <- sample(x = ___, size = ___)
initial_choice <- 1
# Check if the initial choice equals the prize
if(___){
print("The initial choice was correct!")
}
print(prize)