Beräkna en gemensam fördelning

Koden vi utvecklade i det senaste videoavsnittet visas här. Den definierar ett rutnät över de underliggande andelarna av klick (proportion_clicks) och möjliga utfall (n_visitors) i pars. Till detta läggs prior-sannolikheten för varje parameterkombination samt sannolikheten (likelihood) att varje proportion_clicks skulle generera motsvarande n_visitors.

Den här övningen är en del av kursen

Grunderna i bayesiansk dataanalys i R

Visa kurs

Övningsinstruktioner

Lägg till kolumnen pars$probability: sannolikheten för varje kombination av proportion_clicks och n_visitors. Precis som i videon ska denna beräknas genom att multiplicera likelihood med prior.
Se till att kolumnen pars$probability summerar till 1.0 genom att normalisera den, det vill säga dividera pars$probability med den totala summan av pars$probability.

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)

# Add the column pars$probability and normalize it
pars$probability <- ___

Redigera och kör kod