Immunization case status per year — generate_case_num_dose

Generates 4 stacked percent bar plots displaying immunization status of NPAFP cases per year for the country. Note that this function only graphs immunization rates for children aged 6-59 months. The "Missing" category is cases that have no value (i.e. NA) for doses.total. The "Unknown" category has "99" for doses.total. 4 plots: 1 by total number of doses (combined OPV and IPV), 1 by SIA OPV, 1 by Routine OPV, 1 by IPV

Usage

generate_case_num_dose_g(
  ctry.data,
  start_date,
  end_date,
  output_path = Sys.getenv("DR_FIGURE_PATH")
)

Arguments

ctry.data: list A large list containing polio data of country. This is the output of extract_country_data() or init_dr(). Note that ctry_data needs to be cleaned via clean_ctry_data() prior to running the function.
start_date: str Start date of analysis.
end_date: str End date of analysis.
output_path: str Local path of where to save the figure to.

Value

ggplot A percent bar plot displaying NPAFP cases per year by immunization status.

Examples

if (FALSE) { # \dontrun{
ctry.data <- init_dr("algeria")
ctry.data <- clean_ctry_data(ctry.data)
generate_case_num_dose_g(ctry.data, "2021-01-01", "2023-12-31")
} # }