Kondisioning pada data (lagi)

Mari kita hidupkan kembali contoh situs zombie ketika Anda menguji iklan teks. Dari 100 tayangan iklan teks, 6 dari 100 mengeklik dan mengunjungi situs Anda.

Di sebelah kanan kira-kira ada kode yang Anda kembangkan pada latihan sebelumnya. pars saat ini adalah sebaran gabungan atas semua kombinasi proportion_clicks dan n_visitors.

Latihan ini merupakan bagian dari kursus

Dasar-dasar Analisis Data Bayesian di R

Lihat Kursus

Instruksi latihan

Kondisikan pada data dan pertahankan hanya baris pada pars di mana n_visitors == 6.
Normalisasi kembali pars$probability agar jumlahnya menjadi 1.0.
Plot posterior pars$probability menggunakan plot(x = , y = , type = "h") dengan pars$proportion_clicks pada sumbu-x dan pars$probability pada sumbu-y.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

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(___)

Edit dan Jalankan Kode