这是我的代码,刚学这个,一直报unexpected right parenthesis错误,老师让我处理一组试验数据,有没有大佬帮我看一下
model
{
for(i in 1:N)
{
for(j in 1:M)
{
t[j,i]~dweib(niu,yita[i])
log(yita[i])<-beta0+beta1*x[i]
}
}
niu~dgamma(0.0001,0.0001)
beta0~dnorm(miu_beta0,xigema_beta0)
beta1~dnorm(miu_beta1,xigema_beta1)
miu_beta0~dnorm(0,1e6)
miu_beta1~dnorm(0,1e6)
1/xigema_beta0~dgamma(0.001,0.001)
1/xigema_beta1~dgamma(0.001,0.001)
}
#疲劳试验数据
list={t=structure(.Data=c(1,1,1,1,1,
2,1,2,2,0,
0,1,1,0,0,
0,0,2,1,1),.Dim = c(5,4)),x=c(1,2,3,4),N=4,M=5}