Fix bug in prep_new_detections_table

WorldHealthOrganization · Sep 18, 2024 · d8ac0d2 · d8ac0d2
1 parent 68628cb
commit d8ac0d2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/prep_detections.R b/R/prep_detections.R
@@ -154,7 +154,7 @@ prep_new_detections_table <- function(polis_df_old,
         ) |>
         dplyr::filter(
             year > lubridate::year(Sys.Date()) - 3 &
-                !EPID %in% unique(new_epids),
+                !EPID %in% unique(polis_df_old$EPID),
             stringr::str_detect(VirusTypeName, "^WILD|^VDPV|^cVDPV"),
             SurveillanceTypeName %in% c("AFP", "Environmental")
         ) |>