bugfix in get_custom_flags where A_flag was counting both A and AE; f…

…ixed the regex to only count A.
RobLBaker · Feb 14, 2024 · 3ba9a84 · 3ba9a84
1 parent 82bdafa
commit 3ba9a84
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/summarize_qc_flags.R b/R/summarize_qc_flags.R
@@ -119,7 +119,7 @@ get_custom_flags <- function(directory = here::here(),
         # Assessment codes)
         A_flag <- suppressWarnings(sum(stringr::str_count(
           flags_only[j],
-          "\\bA"
+          "\\bA[^E]"
         ), na.rm = TRUE))
         AE_flag <- suppressWarnings(sum(stringr::str_count(
           flags_only[j],