Fixing typo in top regions logic

davidrsch · Nov 25, 2024 · 23c4dc1 · 23c4dc1
1 parent fe6a93a
commit 23c4dc1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/app/logic/top_regions_help.R b/app/logic/top_regions_help.R
@@ -120,7 +120,7 @@ get_country_he <- function(
   } else if (arrange_regions == "Substance") {
     data_to <- sector_substance_data |>
       filter(country == actual_country) |>
-      filter(substance == elected_substance) |>
+      filter(substance == selected_substance) |>
       select(country, substance, matches("x\\d{4}")) |>
       group_by(country, substance) |>
       summarise(across(matches("x\\d{4}"), sum)) |>