"고집하기" 전략의 승리 확률
이제 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)