library(vmsae)
example_model <- readRDS(system.file("example", "example_model.Rds", package = "vmsae"))
summary(example_model) # Summary of beta_samples for variable 1
summary(example_model, var_idx = 2, field = "yhat_samples")
Run the code above in your browser using DataLab