https://github.com/cran/rstpm2
Revision a5ef3506c39866f5e7b3d57e7fa0677cf4edd675 authored by Mark Clements on 13 April 2016, 17:59:18 UTC, committed by cran-robot on 13 April 2016, 17:59:18 UTC
1 parent 553dbb7
Raw File
Tip revision: a5ef3506c39866f5e7b3d57e7fa0677cf4edd675 authored by Mark Clements on 13 April 2016, 17:59:18 UTC
version 1.3.2
Tip revision: a5ef350
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