Sesuaikan model menggunakan himpunan data lain
Mari sesuaikan model binomial pada data iklan video (13 dari 100 mengeklik) dan data iklan teks yang baru (6 dari 100 mengeklik).
Latihan ini merupakan bagian dari kursus
Dasar-dasar Analisis Data Bayesian di R
Latihan interaktif langsung praktik
Cobalah latihan ini dengan melengkapi kode contoh ini.
# Define parameters
n_draws <- 100000
n_ads_shown <- 100
proportion_clicks <- runif(n_draws, min = 0.0, max = 0.2)
n_visitors <- rbinom(n = n_draws, size = n_ads_shown,
prob = proportion_clicks)
prior <- data.frame(proportion_clicks, n_visitors)
# Create the posteriors for video and text ads
posterior_video <- prior[prior$n_visitors == 13, ]
posterior_text <- ___
# Visualize the posteriors
hist(posterior_video$proportion_clicks, xlim = c(0, 0.25))
___