# NOT RUN {
data("posterior")
diagnostics(posterior)
# }
# NOT RUN {
data("pursat")
data("pursat_covariates")
out <- clearanceEstimatorBayes(data = pursat, covariates = pursat_covariates,
niteration = 200, burnin = 50, thin = 10)
diagnostics(out)
# }
Run the code above in your browser using DataLab