From 7124b03e373802e265389b550a2381822f6cbe2e Mon Sep 17 00:00:00 2001 From: Damonamajor Date: Fri, 9 Aug 2024 15:45:16 +0000 Subject: [PATCH] lint --- analyses/aggregated_maps_categorical.qmd | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) diff --git a/analyses/aggregated_maps_categorical.qmd b/analyses/aggregated_maps_categorical.qmd index d113bfc3..493fddb5 100644 --- a/analyses/aggregated_maps_categorical.qmd +++ b/analyses/aggregated_maps_categorical.qmd @@ -15,7 +15,6 @@ suffixes <- pin_nbhd %>% select(starts_with("percentage_")) %>% names() %>% gsub("percentage_", "", .) - ``` ```{r} @@ -27,7 +26,7 @@ maps <- lapply(suffixes, function(suffix) { theme_void() + coord_sf(xlim = c(-88.4, -87.52398), ylim = c(41.5, 42.2)) + ggtitle(paste0("Map for ", suffix)) - + return(map1) }) ``` @@ -48,12 +47,11 @@ for (i in seq_along(maps)) { ```{r} pin_nbhd %>% - ggplot() + - geom_sf(aes(fill = as.factor(plurality_factor))) + - scale_fill_viridis_d(option = "viridis") + - labs(fill = "Variable") + - theme_void() + - coord_sf(xlim = c(-88.4, -87.52398), ylim = c(41.5, 42.2)) + - ggtitle("Plurality Variable") - + ggplot() + + geom_sf(aes(fill = as.factor(plurality_factor))) + + scale_fill_viridis_d(option = "viridis") + + labs(fill = "Variable") + + theme_void() + + coord_sf(xlim = c(-88.4, -87.52398), ylim = c(41.5, 42.2)) + + ggtitle("Plurality Variable") ```