Name sheets "m01", "m02", ...

KWB-R · Jan 11, 2024 · 3731059 · 3731059
1 parent 4dab708
commit 3731059
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/import_json_files_to_excel.R b/R/import_json_files_to_excel.R
@@ -23,7 +23,8 @@ import_json_files_to_excel <- function(
     import_rawdata_json(add_place = TRUE, old_format = FALSE) %>%
     get_core_data() %>%
     core_data_to_wide() %>%
-    split_by_columns("indicator")
+    split_by_columns("indicator") %>%
+    stats::setNames(sprintf("m%02d", seq_along(.)))
 
   file_exists <- file.exists(file)
   quoted_file <- dQuote(file, '"')