베이즈 정리로 업데이트하기
이 장에서는 20번 던져서 11번 앞면이 나온 동전이 공정한지에 대한 사후확률을 시뮬레이션으로 추정해 봤어요. 이제 dbinom()에서 나오는 정확한 확률을 사용해 다시 계산해 보겠습니다. 동전이 공정할 확률은 50%, 치우쳐 있을 확률도 50%라고 가정합니다.
이 연습은 강의의 일부입니다
R로 배우는 확률 기초
연습 안내
dbinom()함수를 사용해 공정한 동전(앞면 확률 50%)과 치우친 동전(앞면 확률 75%)으로 20번 던져 11번 앞면이 나올 정확한 확률을 계산하세요. 각각probability_fair와probability_biased로 저장합니다.- 이를 사용해 동전이 공정할 사후확률을 계산하세요. 이는 공정한 동전에서 11이 나올 확률을, 두 확률의 합으로 나눈 값입니다.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Use dbinom to calculate the probability of 11/20 heads with fair or biased coin
probability_fair <-
probability_biased <-
# Calculate the posterior probability that the coin is fair