Update script.R

deepdk · Nov 11, 2022 · 17efd59 · 17efd59
1 parent 9960b87
commit 17efd59
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/2022/week_45/script.R b/2022/week_45/script.R
@@ -56,6 +56,10 @@ my_theme <- function() {
 
 state_stations <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/master/data/2022/2022-11-08/state_stations.csv')
 
+state_stations <- state_stations %>%
+  mutate(state = str_to_lower(state)) %>% 
+  rename(region = state)
+
 news <- state_stations %>% 
   filter(format == "News/Talk") %>% 
   count(region, sort = TRUE)