# get example multiregion estimates
regional_out <- readRDS(system.file(
package = "EpiNow2", "extdata", "example_regional_epinow.rds"
))
# from output
results <- get_regional_results(regional_out$regional, samples = FALSE)
Run the code above in your browser using DataLab