[自留]23.4.12，课堂

贝叶斯公式

先验概率与后验概率： 

read.csv('E:/bayes.csv')
baydt <- read.csv('E:/bayes.csv')
attach(baydt)

# 先验概率
prior <- weight/sum(weight)
plot(p,prior)
sum(p*prior,type = 'l')
plot(p*prior,type = 'l')

likeli <- choose(30,12)*p^12*(1-p)^18
plot(p*likeli,type = 'l')

 

Beta分布

在概率论中，Beta分布也称Β分布，是指一组定义在区间的连续概率分布，有两个参数。Beta分布的概率密度为：

其中，是函数。随机变量服从Beta分布写作。