R/age-groups.R

In hrbrmstr/cdccovidview: Weekly Surveillance Summary of U.S. COVID-19 Activity

Defines functions age_groups

Documented in age_groups

#' Return age groups used in the surveillance
#'
#' @return character vector
#' @export
age_groups <- function() {

  p <- app_params()

  rev(p$ages$label)

}