specify year in indiv tests

Public-Health-Scotland · Nov 27, 2024 · 56f0ffb · 56f0ffb
1 parent 7dcc78b
commit 56f0ffb
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/R/process_tests_individual_file.R b/R/process_tests_individual_file.R
@@ -34,9 +34,13 @@ process_tests_individual_file <- function(data, year) {
     old_data = produce_individual_file_tests(old_data),
     new_data = produce_individual_file_tests(data)
   ) %>%
-    write_tests_xlsx(sheet_name = stringr::str_glue({
-      "indiv_file_{year}"
-    }), workbook_name = "indiv_file")
+    write_tests_xlsx(
+      sheet_name = stringr::str_glue({
+        "indiv_file_{year}"
+      }),
+      year = year,
+      workbook_name = "indiv_file"
+    )
 
   return(comparison)
 }