同時分布の計算
前の動画で作成したコードが表示されています。このコードは、pars 内でクリック率(proportion_clicks)と訪問者数の可能な値(n_visitors)に対してグリッドを定義します。また、各パラメーターの組み合わせに対する prior(事前確率)と、各 proportion_clicks が対応する n_visitors を生成する尤度(likelihood)が追加されています。
この演習はコースの一部です
RによるベイズデータAnalysisの基礎
演習の手順
- 列
pars$probabilityを追加してください。これは、各proportion_clicksとn_visitorsの組み合わせの確率を表します。動画と同様に、likelihoodとpriorを掛け合わせることで計算します。 pars$probabilityの合計が1.0になるように正規化してください。つまり、pars$probabilityをその合計値で割ります。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
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 <- ___