Skip to main content
Revision 11f1ef137931871a851aa94ab98296376fc10888 authored by Mark Clements on 08 March 2023, 12:20:05 UTC, committed by cran-robot on 08 March 2023, 12:20:05 UTC 
version 1.6.2
1 parent d415ac4
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