Address run error by adding write_csv

opensafely · Jan 23, 2025 · b5850e4 · b5850e4
1 parent 7c08327
commit b5850e4
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/analysis/dataset_definition_tables.R b/analysis/dataset_definition_tables.R
@@ -23,6 +23,11 @@ df_demographics_counts <- map_dfr(
     rename(subcategory = 1)
 )
 
+readr::write_csv(
+  df_demographics_counts,
+  here::here("output", "population", "pf_demographics.csv")
+)
+
 # gt_table <- df_demographics_counts[1:2] %>%
 #   gt() %>%
 #   tab_header(