## code to prepare `age_categories` dataset goes here
age_categories <- list(
Prenatal = list(min = -1, max = 0),
Infant = list(min = 0, max = 1),
Child = list(min = 1, max = 10),
Teen = list(min = 10, max = 20),
Adult = list(min = 20, max = 50),
`50+` = list(min = 50, max = 100)
)
usethis::use_data(age_categories, overwrite = TRUE, internal = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.