## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>", warning = FALSE, message = FALSE)
library(mudnester)
library(dplyr)

## ----browse-------------------------------------------------------------------
# All schemes
list_age_schemes()

## ----browse-filtered----------------------------------------------------------
# Filter by family and focus
list_age_schemes(family = "vaccination", focus = "national_au")

## ----family-a-----------------------------------------------------------------
list_age_schemes(family = "national_stats")

## ----family-b-----------------------------------------------------------------
list_age_schemes(family = "international_stats")

## ----family-c-----------------------------------------------------------------
list_age_schemes(family = "vaccination")

## ----family-d-----------------------------------------------------------------
list_age_schemes(family = "surveillance")

## ----family-e-----------------------------------------------------------------
list_age_schemes(family = "clinical_developmental")

## ----family-f-----------------------------------------------------------------
list_age_schemes(family = "disease_specific")

## ----audit--------------------------------------------------------------------
# Check the source and last_checked date for any scheme
age_schemes[age_schemes$scheme == "atagi_covid19_2025",
            c("scheme","source","source_url","last_checked","is_illustrative")]