模型如下:
model
{ for( i in 1 : N ) {
za[i] ~ dnorm(muz,tauz)
}
for( i in 1 : N ) {
lama[i] ~ dbeta(2,1)
ja[i] ~ dbern(lama[i])
}
for( i in 1 : N ) {
jumpsize[i]<-za[i]*ja[i]
}
for( i in 1 : N ) {g[i]<-pow(r[i],2 * lata)
tau[i] <- isigmma2 / g[i]
}
for( i in 1 : N ) {
mu[i] <- r[i] + alpha0 + alpha1 * r[i] + alpha2 * pow(r[i],2) + alpha3 / r[i] + za[i] * ja[i]
}
for( i in 1 : N ) {
p[i] ~ dnorm(mu[i],tau[i])
}
lamada ~ dbeta(2,1)
alpha0 ~ dnorm( 0.0,1)
alpha1 ~ dnorm( 0.0,1)
alpha2 ~ dnorm( 0.0,1)
alpha3 ~ dnorm( 0.0,1)
lata ~ dnorm( 0.0,2)
isigmma2 ~ dgamma(4,2)
muz ~ dnorm( -0.01,20)
tauz ~ dgamma(4,2)
sigmma<-1/sqrt(isigmma2)
sigmmaz<-1/sqrt(tauz)
}
初始化如下:
#INITIAL VALUES
list(alpha0=0, alpha1 = 0,alpha2=0,alpha3=0,isigmma2 = 4,lata=0,muz=-0.01,tauz=4,lamada=2,sigmma=NA,
sigmmaz=NA)
然后初始化时,提示还有未初始化的变量,我感觉需要的都初始化了,请各位看看还有那个变量未初始化。