# remotes::install_github("sbfnk/socialmixr")
library(socialmixr)
m <- contact_matrix(polymod,
countries = "Italy",
age.limits = seq(0, 75, 5))
contact_matrix_IT <- m$matrix
saveRDS(contact_matrix_IT, file.path("data-raw", "contact_matrix_IT.rds"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.