Skip to main content
Revision b58cc9cd586b6c8ac55b26c2da679f538ec801cc authored by Mark Clements on 17 October 2022, 13:50:02 UTC, committed by cran-robot on 17 October 2022, 13:50:02 UTC 
version 1.5.8
1 parent dbf475c
Raw File
model.bug 
model
{
    for (i in 1:N) {
        y[i] ~ dnorm(0.00000E+00, 1)
        x[i] ~ dinterval(y[i], thd)
    }
    for (i in 1:4) {
        dthd[i] ~ dnorm(0.00000E+00, 1.00000E-04)
    }
    thd[1] <- -1000
    thd[2] <- dthd[1]
    for (i in 3:5) {
        thd[i] <- thd[i - 1] + exp(dthd[i - 1])
    }
}
back to top