求如何用MCMC法求预测分布的预测值

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

见图片





观测值的预测分布如下式：

怎么样才能求出观测值在t=8和t=9时的预测值？求高人给予帮助？
    参数的估计代码本人已编出，如下：
model {

for (i in 1:n){

Y~dnorm(s,tauC)

s<-theta[1]/(1+theta[2]*exp(-theta[3]*t))}

theta[1]~dnorm(mu[1],tau[1])

theta[2]~dnorm(mu[2],tau[2])

theta[3]~dnorm(mu[3],tau[3])

tauC~dgamma(0.01,0.01)

sigmaC<-1/sqrt(tauC)

for (k in 1:3) {

mu[k]~dnorm(0,0.000001)

tau[k]~dgamma(0.01,0.01)}
}
#Data
list(n=7,t=c(1,2,3,4,5,6,7),Y=c(2,5,10,20,30,40,44))

#Init
list(theta=c(1,1,1),mu=c(1,1,1),tau=c(1,1,1),tauC=1)

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：mcmc CMC 如何用 预测值 dnorm 预测 mcmc

model {
   for (i in 1:n){
    Y[i]~dnorm(s[i],tauC)
    s[i]<-theta[1]/(1+theta[2]*exp(-theta[3]*t[i]))}
    theta[1]~dnorm(mu[1],tau[1])
    theta[2]~dnorm(mu[2],tau[2])
    theta[3]~dnorm(mu[3],tau[3])
    tauC~dgamma(0.01,0.01)
    sigmaC<-1/sqrt(tauC)
  for (k in 1:3) {
    mu[k]~dnorm(0,0.000001)
    tau[k]~dgamma(0.01,0.01)}
for(m in 1:2){
  pred.Y[m]~dnorm(pred.s[m],tauC)
  pred.s[m]<-theta[1]/(1+theta[2]*exp(-theta[3]*t.new[m]))
}
}
#Data
list(n=7,t=c(1,2,3,4,5,6,7),Y=c(2,5,10,20,30,40,44),t.new=c(8,9))
#Init
list(theta=c(1,1,1),mu=c(1,1,1),tau=c(1,1,1),tauC=1,pred.Y=c(NA,NA))

load inits
gen inits

非常感谢你啊，我也刚看了预测分布的求法，有机会多向你学习~

学习，好东西

2# epoh

不错，很受益啊！

可以透露这本书的书名吗，好像是电子版的书上面弄下来的。感激不尽~~

epoh 发表于 2010-5-18 21:33
model {
   for (i in 1:n){
    Y~dnorm(s,tauC)

你好，请问最终的预测值取的是code里的值还是抽样的均值呢