Ajuster le modèle avec un autre jeu de données
Ajustons le modèle binomial aux deux jeux de données : les données sur la pub vidéo (13 clics sur 100) et les nouvelles données sur la pub texte (6 clics sur 100).
Cette activité fait partie du cours
Principes fondamentaux de l'analyse de données bayésienne en R
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# 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))
___