다른 결과에 대한 업데이트
이전 연습 문제에서는 동전을 20번 던져 11번 앞면이 나왔을 때, 사전에 공정한 동전일 가능성과 한쪽으로 치우친 동전일 가능성이 동일하다고 가정하고, 그 동전이 공정할 확률을 계산했어요. 당시 코드는 다음과 비슷했죠:
probability_fair <- dbinom(11, 20, .5)
probability_biased <- dbinom(11, 20, .75)
probability_fair / (probability_fair + probability_biased)
이제 dbinom()을 이용하는 같은 접근으로, 두 가지 다른 결과가 있었을 때의 사후확률을 구해 보세요.
이 연습은 강의의 일부입니다
R로 배우는 확률 기초
연습 안내
- 동전을 20번 던져 14번 앞면이 나왔을 때, 그 동전이 공정할 확률을 구하세요.
- 동전을 20번 던져 18번 앞면이 나왔을 때, 그 동전이 공정할 확률을 구하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Find the probability that a coin resulting in 14/20 is fair
# Find the probability that a coin resulting in 18/20 is fair