Viết hàm để "đổi cửa"
Trước khi mô phỏng tình huống "đổi cửa", trước hết hãy viết một hàm để chọn cửa sẽ mở trong bối cảnh này. Sau đó, bạn sẽ dùng hàm này trong Bài tập tiếp theo để mô phỏng xác suất thắng khi đổi cửa.
Nhắc lại: nếu cửa được chọn ban đầu là đúng, người dẫn chương trình sẽ ngẫu nhiên mở một trong hai cửa còn lại.
Nếu cửa được chọn ban đầu là sai, người dẫn chương trình sẽ đơn giản mở cửa sai còn lại. Lưu ý rằng trong trường hợp này việc mở cửa không có yếu tố ngẫu nhiên.
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
Hướng dẫn bài tập
- Khi lựa chọn ban đầu là đúng, dùng hàm
sampleđể ngẫu nhiên chọn một trong các cửa còn lại để mở. - Ngược lại, chọn cửa còn lại duy nhất để mở.
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.
reveal_door <- function(doors, prize, initial_choice){
if(prize == initial_choice){
# Sample at random from the two remaining doors
reveal <- sample(x = ___, size = 1)
} else {
# When the prize and initial choice are different, reveal the only remaining door
reveal <- ___
}
}