如何防止xlim使用geom_curve改变高度?

Dam*_*mbo 11 r ggplot2

我有以下代码:

library(tidyverse)
data_frame(x = 1:5, x1=x+1, c = c('a','a','a','b','b')) %>% 
      ggplot() +
      geom_curve(aes(x = x, xend= x1, y = 0, yend = 0), curvature = -1.3, alpha=.2) +
    facet_wrap(~ c, ncol=1)
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述 但是我想调整y轴的极限以将背景区域切割到〜.1以上.

我试着这样做:

data_frame(x = 1:5, x1=x+1, c = c('a','a','a','b','b')) %>% 
  ggplot() +
  geom_curve(aes(x = x, xend= x1, y = 0, yend = 0), curvature = -1.3, alpha=.2) +
  facet_grid(c ~ .) +
  ylim(0,.35) +
  facet_wrap(~ c, ncol=1)
Run Code Online (Sandbox Code Playgroud)

但它只是根据中的值重新调整拱门ylim.我该如何防止这种行为?

小智 3

ylim(0,.35)替换为 coord_fixed(ylim=c(0, 0.35))你想要的吗?