Displaying 1 result from an estimated 1 matches for "mu20n".
Did you mean:
mu20ns
2012 Jul 09
1
R to winbugs interface
...beta[1]+beta[2]*Age[i]+beta[3]*Smoke[i]+beta[4]*Age[i]*Smoke[i]
}
beta[1:r]~dmnorm(beta0[1:r],C0inv[1:r,1:r])
tau~dgamma(a,b)
for (i in 1:10)
{
meanFEVs[i] <- beta[1] + (beta[2]+beta[4])*(i+9) + beta[3]
meanFEVns[i] <- beta[1] + beta[2]*(i+9)
}
FEV20s ~ dnorm(mu20s,tau)
FEV20ns ~ dnorm(mu20ns,tau)
mu20s <- beta[1] + (beta[2]+beta[4])*20 + beta[3]
mu20ns <- beta[1] + beta[2]*20
}
Please help me with this problem.
[[alternative HTML version deleted]]