# \donttest{
# Load example GHRmodels object from the package:
model_list_file <- system.file("examples", "model_list.rds", package = "GHRmodel")
model_list <- readRDS(model_list_file)
# Get a list of the 5 best models by DIC
top_model_dic <- rank_models(
models = model_list,
metric = "dic",
n = 5
)
top_model_dic
# }
Run the code above in your browser using DataLab