Displaying 1 result from an estimated 1 matches for "schno".
Did you mean:
sch_no
2009 Jul 16
1
Error with r2winbugs
...for (j in 1:n.schn){
bschn[j] ~ dnorm(0,tau.schn)
}
tau.schn <- pow(sigma.schn, -2)
sigma.schn ~ dunif(0,100)
}
I am running the following syntax:
enroll.wide.m <- na.omit(enroll.wide)
n <- nrow(enroll.wide.m)
y <- enroll.wide.m$sus.5
sch <- as.vector(enroll.wide.m$schno.5)
uniq <- unique(sch)
n.schn <- length(uniq)
male <- enroll.wide.m$male
schn <- enroll.wide.m$schno.5
data <- list ("n","n.schn","y","male","schn")
inits <- function() {list (bschn=rnorm(n.schn), mu=rnorm(1,0,100),
bmale=rnorm(1,...