data <-
list("N","J","K","pa","unit","hosp","tech","teach","beds","unitsur","we","expe",
"full")
inits1<-list(p0=0.1,tau1=0,tau2=0, beta =c(1,1,1,1,1,1,1,1))
inits2<-list(p0=0.5,tau1=1,tau2=1, beta =c(1,1,1,1,1,1,1,1))
data.inits<-list(inits1, inits2)
## Parameters to estimate
parameters <- c("beta", "tau1","tau2", "p0")
Burnout.sim=bugs(data, inits=data.inits, parameters, "Burnoutmodel.txt",
n.chains = 2, n.iter = 1000,
bugs.directory="C:/Users/molasey/Desktop/WINBUGS/winbugs14/WinBUGS14/",
debug=TRUE)
当我使用库(R2WINBUGS)运行上述代码时,winbugs面板显示以下消息:
预期收集运营商c 编译(2) inits(1,C:/Users/molasey/AppData/Local/Temp/RtmpmAA9bi/inits1.txt) 命令#Bugs:inits无法执行(灰显)
请帮帮我。