Xác suất thắng khi "đổi cửa"
Giờ hãy viết mã cho tình huống người chơi ban đầu chọn Cửa #1, rồi sau khi một cửa có dê được mở, họ đổi sang cánh cửa còn lại.
Cũng như trước, trước tiên chúng ta sẽ mô phỏng chỉ một lượt. Sau đó, đưa vào vòng lặp for để chạy quá trình nhiều lần nhằm ước tính bằng mô phỏng xác suất thắng thực sự.
Bài tập này là một phần của khóa học
Câu đố Xác suất với R
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
set.seed(1)
prize <- sample(doors,1)
initial_choice <- 1
# Use the reveal_door function to do the reveal
reveal <- reveal_door(___, ___, ___)
# Switch to the remaining door
final_choice <- ___
print(final_choice)
# Check whether the final choice equals the prize
if(___){
print("The final choice is correct!")
}