摘要殭屍藥物實驗
使用機率分佈的樣本，就是為了能「輕鬆」計算你關心的各種指標。接下來的任務就是要你這麼做！
本練習屬於課程
R 的 Bayesian 資料分析基礎
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
data = c(1, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0)
posterior <- prop_model(data)
hist(posterior, breaks = 30, xlim = c(0, 1), col = "palegreen4")
# Calculate the median