Aktualizace simulací po 16 orlech

Pozorujeme 16 orlů z 20 hodů mincí, která je buď spravedlivá (50% šance na orla), nebo zkreslená (75% šance na orla). Jak pravděpodobné je, že je mince spravedlivá?

Toto cvičení je součástí kurzu

Základy pravděpodobnosti v R

Zobrazit kurz

Pokyny k cvičení

Simuluj 50 000 případů hodu 20 mincemi – jednou pro spravedlivou minci (50% šance na orla) a jednou pro zkreslenou minci (75% šance na orla). Výsledky ulož do proměnných fair a biased.
Zjisti počet spravedlivých mincí, kde padlo přesně 16 orlů z 20, a počet zkreslených mincí, kde padlo přesně 16 orlů z 20. Ulož je jako fair_16 a biased_16.
Vypiš podíl všech mincí, které padly orlem 16krát, jež byly spravedlivé – to je aposteriorní pravděpodobnost, že mince s výsledkem 16/20 je spravedlivá.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Simulate 50000 cases of flipping 20 coins from fair and from biased
fair <- 
biased <- 

# How many fair cases, and how many biased, led to exactly 16 heads?
fair_16 <- 
biased_16 <- 

# Find the fraction of fair coins that are 16 out of all coins that were 16

Upravit a spustit kód