# NOT RUN {
hemc(x = seq(1, 30), theta_R = c(0.27, 0.4), theta_S = c(0.65, 0.47),
alpha = c(0.1393, 0.0954), n = c(6.37, 7.47),
b1 = c(-0.008421, -0.011970), b2 = c(0.0001322, 0.0001552))
# End (Not run)
# }
Run the code above in your browser using DataLab