当 ymax 超过 Y 轴刻度时，误差线渲染不正确

Question

我想在scale_y_continuous 中使用limits 来“裁剪”我的Y 轴：

df1 <- data.frame(xx=c('a','b','c'),
                  yy=c(7, 10, 8),
                  se=c(2, 4, 2))
p <- ggplot(data=df1, mapping = aes(x=xx, y=yy)) + 
  geom_bar(data = df1, position=position_dodge(), stat="identity") +
  geom_errorbar(aes(ymin=yy-se, ymax=yy+se), width=0.1, position=position_dodge())

p # left plot

p + scale_y_continuous(limits=c(0,11)) # middle plot
# Warning message:
# Removed 4 rows containing missing values (geom_path).

在这种情况下，一个误差条超过了 Y 轴的上限，我希望它被裁剪（如右图），但实际上误差条的垂直线根本没有呈现（参见.情节在中间）。除了手动绘制误差线之外，还有什么办法可以解决这个问题？

Answer 1

我相信

library("scales")
p + scale_y_continuous(limits=c(0,11),oob=squish)

会做（未测试）； “oob”代表“越界”

更标准的答案是使用

coord_cartesian(ylim=c(0,11))

但这也会改变刻度间距等。