# NOT RUN {
if(requireNamespace("INLA", quietly = TRUE)) {
require("INLA", quietly = TRUE)
data(Catheter)
outdata = makeData(data=Catheter,model.type=1,covariates="type")
outpriors = makePriors(var.prior = "invgamma", cor.prior = "normal",
var.par = c(0.25, 0.025), cor.par = c(0, 5))
runModel(outdata, outpriors, link = "logit",
quantiles = c(0.025, 0.5, 0.975), verbose = FALSE)
}
# }
Run the code above in your browser using DataLab