no more expand_scale()

wilkelab · Aug 22, 2020 · 1d438f3 · 1d438f3
1 parent b2532b0
commit 1d438f3
Show file tree

Hide file tree

Showing 5 changed files with 6 additions and 6 deletions.
diff --git a/vignettes/aligning_plots.Rmd b/vignettes/aligning_plots.Rmd
@@ -61,7 +61,7 @@ p1 <- ggplot(mtcars, aes(disp, mpg)) +
 p2 <- ggplot(mtcars, aes(factor(vs))) + 
   geom_bar() + 
   facet_wrap(~am) +
-  scale_y_continuous(expand = expand_scale(mult = c(0, 0.1))) +
+  scale_y_continuous(expand = expansion(mult = c(0, 0.1))) +
   theme_minimal_hgrid(12) +
   panel_border(color = "black") +
   theme(strip.background = element_rect(fill = "gray80"))
@@ -126,7 +126,7 @@ city_mpg <- city_mpg %>%
 p1 <- ggplot(city_mpg, aes(class, count)) +
   geom_col(fill = "#6297E770") + 
   scale_y_continuous(
-    expand = expand_scale(mult = c(0, 0.05)),
+    expand = expansion(mult = c(0, 0.05)),
     position = "right"
   ) +
   theme_minimal_hgrid(11, rel_small = 1) +

diff --git a/vignettes/drawing_with_on_plots.Rmd b/vignettes/drawing_with_on_plots.Rmd
@@ -107,7 +107,7 @@ The `draw_plot()` function also allows us to place plots at arbitrary locations
 ```{r fig.width = 6, fig.height = 4.5}
 inset <- ggplot(mpg, aes(drv)) + 
   geom_bar(fill = "skyblue2", alpha = 0.7) + 
-  scale_y_continuous(expand = expand_scale(mult = c(0, 0.05))) +
+  scale_y_continuous(expand = expansion(mult = c(0, 0.05))) +
   theme_minimal_hgrid(11)
 
 ggdraw(p + theme_half_open(12)) +

diff --git a/vignettes/introduction.Rmd b/vignettes/introduction.Rmd
@@ -45,7 +45,7 @@ ggplot(iris, aes(Sepal.Length, Sepal.Width, color = Species)) +
 # minimal horizontal grid theme
 ggplot(iris, aes(Sepal.Length, fill = Species)) + 
   geom_density(alpha = 0.5) +
-  scale_y_continuous(expand = expand_scale(mult = c(0, 0.05))) +
+  scale_y_continuous(expand = expansion(mult = c(0, 0.05))) +
   theme_minimal_hgrid(12)
 ```
 

diff --git a/vignettes/shared_legends.Rmd b/vignettes/shared_legends.Rmd
@@ -117,7 +117,7 @@ p1 <- ggplot(iris, aes(Sepal.Length, Sepal.Width, color = Species)) +
 # plot 2
 p2 <- ggplot(iris, aes(Sepal.Length, fill = Species)) +
   geom_density(alpha = .7) + 
-  scale_y_continuous(expand = expand_scale(mult = c(0, 0.05))) +
+  scale_y_continuous(expand = expansion(mult = c(0, 0.05))) +
   theme_half_open(12) +
   theme(legend.justification = "top")
 p2a <- p2 + theme(legend.position = "none")

diff --git a/vignettes/themes.Rmd b/vignettes/themes.Rmd
@@ -72,7 +72,7 @@ p <- ggplot(mtcars, aes(factor(cyl))) +
   geom_bar(fill = "#56B4E9", alpha = 0.8) +
   scale_y_continuous(
     # don't expand y scale at the lower end
-    expand = expand_scale(mult = c(0, 0.05))
+    expand = expansion(mult = c(0, 0.05))
   )
 
 p + theme_half_open()