# \donttest{
# Using the triptans data
network <- mbnma.network(triptans)
# Fit a dose-response MBNMA, monitoring "psi" and "resdev"
result <- mbnma.run(network, fun=dloglin(), method="random",
parameters.to.save=c("psi", "resdev"))
mbnma.update(result, param="theta") # monitor theta
mbnma.update(result, param="rhat") # monitor rhat
mbnma.update(result, param="delta") # monitor delta
# }
Run the code above in your browser using DataLab