Konditionering på data (igen)
Nu återvänder vi till exemplet med zombiesajten där du testade textannonser. Av 100 visningar av textannonsen klickade 6 av 100 och besökte din sajt.
Till höger ser du ungefär den kod du tog fram i den förra övningen. pars är för tillfället den gemensamma fördelningen över alla kombinationer av proportion_clicks och n_visitors.
Den här övningen är en del av kursen
Grunderna i bayesiansk dataanalys i R
Övningsinstruktioner
- Konditionera på data och behåll bara de rader i
parsdärn_visitors == 6. - Normalisera
pars$probabilityigen så att den summerar till1.0. - Plotta den posteriora fördelningen
pars$probabilitymedplot(x = , y = , type = "h"), medpars$proportion_clickspå x-axeln ochpars$probabilitypå y-axeln.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
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(___)