用三个可能性更新
假设硬币不只是公平或偏置两种情况,而是有三种可能:公平(正面 50%)、低(正面 25%)和高(正面 75%)。它是公平的概率为 80%,偏低的概率为 10%,偏高的概率为 10%。
您观察到 20 次抛掷中有 14 次为正面。该硬币是公平的概率是多少?
本练习是课程的一部分
R 中的概率基础
练习说明
- 使用
rbinom()函数分别模拟来自公平硬币的 80,000 次抽样、来自高概率硬币的 10,000 次抽样,以及来自低概率硬币的 10,000 次抽样,每次抽样包含 20 次抛掷。分别保存为flips_fair、flips_high和flips_low。 - 对于每一种类型,计算结果为 14 的硬币个数。分别保存为
fair_14、high_14和low_14。 - 通过将结果为 14 的公平硬币个数除以结果为 14 的硬币总数,求出该硬币为公平的后验概率。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Simulate 80,000 draws from fair coin, 10,000 from each of high and low coins
flips_fair <-
flips_high <-
flips_low <-
# Compute the number of coins that resulted in 14 heads from each of these piles
fair_14 <-
high_14 <-
low_14 <-
# Compute the posterior probability that the coin was fair