Updaten voor andere uitkomsten
In de vorige oefening heb je de kans berekend dat de munt eerlijk is als er 11 keer kop valt in 20 worpen, uitgaande van vooraf gelijke kansen op een eerlijke of een bevooroordeelde munt. De code zag er ongeveer zo uit:
probability_fair <- dbinom(11, 20, .5)
probability_biased <- dbinom(11, 20, .75)
probability_fair / (probability_fair + probability_biased)
Nu ga je, met de dbinom()-aanpak, de posterieure kans bepalen voor twee andere uitkomsten.
Deze oefening maakt deel uit van de cursus
Basis van kansrekening in R
Oefeninstructies
- Bepaal de kans dat een munt die 14 keer kop oplevert in 20 worpen eerlijk is.
- Bepaal de kans dat een munt die 18 keer kop oplevert in 20 worpen eerlijk is.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
# Find the probability that a coin resulting in 14/20 is fair
# Find the probability that a coin resulting in 18/20 is fair