Remove hardcoded group var name

epiverse-trace · Mar 25, 2024 · 4b80aca · 4b80aca
1 parent cdb5ab7
commit 4b80aca
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/inst/rmarkdown/templates/transmissibility/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/transmissibility/skeleton/skeleton.Rmd
@@ -347,7 +347,7 @@ total_cases <- dat_i %>%
   group_by(.data[[group_var]]) %>%
   summarise(cases = sum(count)) %>%
   mutate(group_var := fct_reorder(
-    .f = region,
+    .f = .data[[group_var]],
     .x = cases
   ))