게임 10000회 시뮬레이션

이제 게임을 10000회 시뮬레이션해 보겠습니다. 2와 12는 발생 확률이 동일하게 낮은데, 한 게임에서 2 또는 12가 두 번을 초과해 나올 확률은 얼마나 될까요?

기본 전략에서는 2 또는 12가 있는 칸은 가장 드물게 나오므로 피하라고 하지만, 이론적으로 그렇다 해도 실제로 기대보다 더 자주 나온다면 얼마나 놀라워해야 하는지 살펴보겠습니다. 이전 연습 문제에서 사용한 roll_dice 함수는 미리 로드되어 있습니다.

이 연습은 강의의 일부입니다

R로 풀어보는 확률 퍼즐

강의 보기

연습 안내

replicate 함수를 사용해 두 개의 주사위를 60번 굴리세요.
복합 조건을 사용해 2 또는 12가 두 번을 초과해 나왔는지 확인하세요.
한 게임에서 2 또는 12가 두 번을 초과해 나올 확률의 추정값을 출력하세요.

실습형 인터랙티브 연습

이 예제를 이 샘플 코드를 완성하여 풀어보세요.

set.seed(1)
counter <- 0

for(i in 1:10000){
  # Roll two dice 60 times
  rolls <- ___
  
  # Check whether 2 or 12 was rolled more than twice
  if(___){
    counter <- counter + 1
  }  
}

# Print the answer
print(___)

코드 편집 및 실행