Actualizarea cu simulare după 16 rezultate cap

Observăm 16 rezultate cap din 20 de aruncări ale unei monede care fie este corectă (50% șanse de cap), fie este trucată (75% șanse de cap). Cât de probabilă este ipoteza că moneda este corectă?

Acest exercițiu face parte din cursul

Bazele probabilității în R

Vezi cursul

Instrucțiuni pentru exercițiu

Simulează 50.000 de cazuri de aruncare a câte 20 de monede, atât pentru o monedă corectă (50% șanse de cap), cât și pentru una trucată (75% șanse de cap). Salvează rezultatele în variabilele fair și, respectiv, biased.
Găsește numărul de monede corecte care au dat exact 16/20 rezultate cap, apoi numărul de monede trucate care au dat exact 16/20 rezultate cap. Salvează-le ca fair_16 și, respectiv, biased_16.
Afișează fracția din totalul monedelor care au dat cap de 16 ori și care sunt monede corecte — aceasta este probabilitatea posterioară că o monedă cu 16/20 rezultate cap este corectă.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

# 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

Editează și rulează codul