apply autoformat to reportCharts

pik-piam · Sep 29, 2023 · 5fdaa4c · 5fdaa4c
1 parent af9eae9
commit 5fdaa4c
Show file tree

Hide file tree

Showing 2 changed files with 254 additions and 219 deletions.
diff --git a/R/reportCharts.R b/R/reportCharts.R
@@ -205,7 +205,7 @@ reportCharts <- function(gdx = NULL, regionMapping = NULL, hist = NULL, reportfi
 
   series <- regionMapping %>%
     group_by(name = .data$RegionCode) %>%
-    do(data = list_parse(select(.data, CountryCode))) %>%
+    do(data = list_parse(select(.data, !!sym("CountryCode")))) %>%
     ungroup()
   series$color <- colors[series$name]