1. Učit se
    2. /
  2. Kurzy
    3. /
  3. Základy pravděpodobnosti v R
Connected

cvičení

Další aktualizace s priory

Předpokládejme, že při 20 hodech padne 16 krát hlava – to by normálně bylo silný důkaz, že je mince zkosená. Ale co kdybychom nastavili prior pravděpodobnost 99 % pro to, že mince je férová (50% šance padnutí hlavy), a jen 1 % pro to, že je zkosená (75% šance padnutí hlavy)?

V tomto cvičení najdeš přesnou odpověď pomocí dbinom() a Bayesova teorému. Připomeň si, že Bayesův teorém vypadá takto:

$$\Pr(\mbox{fair}|A)=\frac{\Pr(A|\mbox{fair})\Pr(\mbox{fair})}{\Pr(A|\mbox{fair})\Pr(\mbox{fair})+\Pr(A|\mbox{biased})\Pr(\mbox{biased})}$$

Pokyny

100 XP
  • Pomocí dbinom() vypočítej pravděpodobnosti, že férová mince a zkosená mince by daly 16 hlav z 20 hodů.
  • Pomocí Bayesova teorému zjisti posterior pravděpodobnost, že mince je férová, za předpokladu, že prior pravděpodobnost férovosti mince je 99 %.