Condiționarea pe date (din nou)

Să revenim la exemplul cu site-ul de zombi, unde ai testat reclame text. Din 100 de afișări ale reclamei text, 6 din 100 de utilizatori au dat clic și au vizitat site-ul tău.

În dreapta se află aproximativ codul dezvoltat în exercițiul anterior. pars reprezintă în prezent distribuția comună peste toate combinațiile de proportion_clicks și n_visitors.

Acest exercițiu face parte din cursul

Fundamentals of Bayesian Data Analysis in R

Vezi cursul

Instrucțiuni pentru exercițiu

Condiționează pe date și păstrează doar rândurile din pars în care n_visitors == 6.
Normalizează din nou pars$probability, pentru a te asigura că suma este 1.0.
Reprezintă grafic distribuția posterioară pars$probability folosind plot(x = , y = , type = "h"), cu pars$proportion_clicks pe axa x și pars$probability pe axa y.

Exercițiu interactiv practic

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

n_ads_shown <- 100
proportion_clicks <- seq(0, 1, by = 0.01)
n_visitors <- seq(0, 100, by = 1)
pars <- expand.grid(proportion_clicks = proportion_clicks,
                    n_visitors = n_visitors)
pars$prior <- dunif(pars$proportion_clicks, min = 0, max = 0.2)
pars$likelihood <- dbinom(pars$n_visitors, 
    size = n_ads_shown, prob = pars$proportion_clicks)
pars$probability <- pars$likelihood * pars$prior
pars$probability <- pars$probability / sum(pars$probability)
# Condition on the data 
pars <- ___
# Normalize again
pars$probability <- ___
# Plot the posterior pars$probability
plot(___)

Editează și rulează codul