使用 ggforce facet_zoom 操纵 y 轴刻度

Question

我正在绘制一个时间序列，我想放大一些观察结果。这可以使用 ggforce 包中的 facet_zoom() 来完成。

library(dplyr)
library(ggplot2)
library(ggforce)
library(stringr)


airquality %>% 
  mutate(month_day = seq(as.Date("2000/1/1"), 
                         by = "month", 
                         length.out = n())) %>% 
  ggplot(aes(x = month_day, y = Temp)) + 
  geom_line() +
  facet_zoom(x = month_day > "2010/1/1" & month_day < "2010/9/1")

结果图：

但是，我想操纵下面板图的 y 轴上的比例，使其更小。有没有办法做到这一点？

Answer 1

使用 xy 而不是 x，并将 horizontal 设置为 TRUE 以自动适应 y 轴：

airquality %>% 
  mutate(month_day = seq(as.Date("2000/1/1"), 
                         by = "month", 
                         length.out = n())) %>% 
  ggplot(aes(x = month_day, y = Temp)) + 
  geom_line() +
  facet_zoom(xy = month_day > "2010/1/1" & month_day < "2010/9/1", horizontal = FALSE)

使用 ggforce facet_zoom 操纵 y 轴刻度

Manipulate y-axis scale using ggforce facet_zoom

r

ggplot2

ggforce