Model
{
for (i in 1:n)
{
z[i]<-1-alpha/(A[i]*pow(D[i], beta));
theta[i]<-(0.9*step(z[i])+0.1)*exp(-0.5*abs(z[i]));
x[i]~dbern(theta[i]);
}
1/alpha~dunif (0.1, 100);
beta~dunif (0.1, 2);
}
楼主: 陈贺1986
|
434
1
WinBUGS Check Model出现invalid or excepted token scanned,请大神帮助! |
京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明 免责及隐私声明