From e383890eac2bb7c957925077ef6ecc5aea544fdc Mon Sep 17 00:00:00 2001 From: Michelle Sloan Date: Tue, 12 May 2026 10:04:40 -0400 Subject: [PATCH] Update kpi.main.functions.R correction for bad madagascar code in an epid --- R/kpi.main.functions.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/R/kpi.main.functions.R b/R/kpi.main.functions.R index 4bbd522e..34a37f5f 100644 --- a/R/kpi.main.functions.R +++ b/R/kpi.main.functions.R @@ -219,7 +219,8 @@ get_ctry_abbrev <- function(afp_data) { !(place.admin.0 == "INDIA" & ctry.short == "PAK"), !(place.admin.0 == "PAKISTAN" & ctry.short == "IND"), !(place.admin.0 == "ZAMBIA" & ctry.short == "TAN"), - !(place.admin.0 == "PARAGUAY" & ctry.short == "TTO") + !(place.admin.0 == "PARAGUAY" & ctry.short == "TTO"), + !(place.admin.0 == "MADAGASCAR" & ctry.short == "MAN") ) |> dplyr::mutate(ctry.short = dplyr::case_when( ctry.short == "IND" & place.admin.0 == "INDONESIA" ~ "IDN",