y
MCMCから取得した分布を使用して、任意の点からの分布を予測してみませんx
か?使用している例では、関連するセクションがあります。ここで、eggmass=yおよびlength=x
##@ 3.1 @##
## Function to compute predictions from the posterior
## distribution of the salmon regression model
predict_eggmass<-function(pars,length)
{
a <- pars[, 1] #intercept
b <- pars[, 2] #slope
sigma <- pars[, 3] #error
pred_mass <- a + b * length
pred_mass <- rnorm(length(a), pred_mass, sigma)
return(pred_mass)
}
### -- ###
##@ 3.2 @##
## generate prediction
pred_length <- 80 # predict for an 80cm individual
pred <- predict_eggmass(mcmc_salmon$trace, length=pred_length)
## Plot prediction distribution
hist(pred, breaks=30, main='', probability=TRUE)
## What is the 95% BCI of the prediction?
pred_BCI <- quantile(pred, p=c(0.025, 0.975))
2.5% 97.5%
33.61029 43.16795
コメントで参照している分布はここで入手できpred
、信頼区間はpred_BCI
です。