针对其他结果进行更新

在上一个练习中，您在先验认为硬币为公平或偏置的可能性相等的前提下，求解了当 20 次抛硬币出现 11 次正面时，该硬币为公平的概率。回顾代码大致如下：

probability_fair <- dbinom(11, 20, .5)
probability_biased <- dbinom(11, 20, .75)
probability_fair / (probability_fair + probability_biased)

现在，您将使用 dbinom() 的方法，分别求出另外两种结果下的后验概率。