몬티 홀

R로 풀어보는 확률 퍼즐

Peter Chi

Assistant Professor of Statistics Villanova University

문 하나를 선택하세요

doors 객체:

doors

1 2 3

문 1을 선택했고, 문 2에 경품이 있다고 가정합시다...

남은 문을 공개:

reveal <- doors[-c(1,2)]
reveal

doors 객체:

doors

1 2 3

문 1을 선택했고, 실제로 문 1에 경품이 있다고 가정합시다...

남은 문을 무작위로 공개:

reveal <- sample(x = doors[-1], size = 1)

R로 풀어보는 확률 퍼즐