# NOT RUN {
## Setting up dummy sampling for fast execution of example
## Please use 4 chains and 100x more warmup & iter in practice
.user_mc_options <- options(OncoBayes2.MC.warmup=10, OncoBayes2.MC.iter=20, OncoBayes2.MC.chains=1)
example_model("single_agent")
posterior_interval(blrmfit)
## Recover user set sampling defaults
options(.user_mc_options)
# }
Run the code above in your browser using DataLab