0
我正在使用WinBUGS軟件包處理不同的項目功能模型。我已經成功構建了更簡單的模型,但我也收到了錯誤「期望收集操作符c」。 如果你能幫忙,我會很高興。WinBugs中的「預期收集操作員c」錯誤
# Model
Model
{
for (j in 1:40){
for (k in 1:5){
y[j,k] ~ dbern(p[j,k])
logit(p[j,k])<- u2[j] - beta[k] + gamma[k]*grp[j]
}
}
# Random effect prior
for (j in 1:40){
u2[j] ~ dnorm(0,tau.u2)
}
# Fixed effect prior
for (k in 1:5){
beta[k] ~ dnorm(0, .0001)
gamma[k] ~ dnorm(0,.0001)
}
tau.u2 <- pow(sigma.u2, -2)
sigma.u2 ~ dunif (0, 100)
}
# Data
list(y=structure(
.Data=c(1, 1, 1, 1, 1,
1, 0, 1, 0, 1,
0, 1, 1, 1, 1,
1, 0, 0, 1, 1,
1, 0, 0, 0, 1,
0, 1, 1, 1, 0,
0, 1, 1, 1, 1,
1, 0, 0, 0, 1,
1, 0, 1, 1, 1,
0, 1, 0, 0, 0,
1, 1, 1, 0, 1,
0, 1, 1, 0, 1,
1, 1, 1, 1, 1,
0, 1, 0, 1, 0,
1, 1, 1, 1, 1,
0, 0, 1, 1, 1,
0, 0, 0, 1, 0,
1, 1, 1, 0, 0,
1, 0, 0, 0, 0,
0, 0, 0, 0, 0,
0, 1, 0, 0, 0,
0, 1, 0, 0, 0,
0, 0, 0, 0, 1,
0, 0, 0, 0, 0,
0, 1, 0, 0, 0,
0, 0, 0, 0, 0,
1, 0, 0, 1, 0,
1, 1, 1, 1, 0,
1, 1, 0, 0, 1,
0, 1, 1, 1, 1,
1, 1, 0, 0, 0,
0, 0, 0, 1, 0,
0, 1, 1, 1, 0,
1, 0, 1, 1, 0,
1, 0, 1, 0, 0,
0, 0, 1, 1, 0,
0, 0, 1, 1, 0,
0, 1, 0, 1, 0,
1, 1, 1, 1, 0,
0, 0, 0, 1, 1),
.Dim=c(40,5)), grp=c(1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0))
#Initital values
list(beta=c(0, 0, 0, 0, 0), gamma=c(0, 0, 0, 0, 0), sigma.u2=1, u2=0))
謝謝克里斯傑克遜... – sibel 2014-10-13 18:20:21
感謝兄弟,非常有幫助 – 2016-01-15 22:14:31