ggplot2强制y轴从原点开始并浮动y轴上限

Question

经过一番搜索,我仍然不高兴!

是否有一种简单的方法可以制作一个y轴从原点开始并清晰显示所有数据的图形？

这是我的问题:

set.seed(123)
my.data<- data.frame(x.var = rnorm(100, 50),
                     y.var = rnorm(100, 50,10))


## Annoying because it doesn't start at origin
ggplot(my.data, aes(x.var, y.var))+
  geom_point()


## Annoying because origin is not at bottom
ggplot(my.data, aes(x.var, y.var))+
  geom_point()+
  expand_limits(y = 0)

## Annoying because point is cut off
ggplot(my.data, aes(x.var, y.var))+
  geom_point()+
  scale_y_continuous(expand = c(0,0))+
  expand_limits(y = 0)

问题"强制原点从ggplot2(R)中的0开始"的最佳答案以

"你可能需要稍微调整一下以确保点不会被切断"

为什么会这样？我可以手动调整轴,但我不想每次都这样做!

互联网上的一些家伙有一个涉及的解决方案

#Find the current ymax value for upper bound
#(via http://stackoverflow.com/questions/7705345/how-can-i-extract-plot-axes-ranges-for-a-ggplot2-object#comment24184444_8167461 )
gy=ggplot_build(g)$panel$ranges[[1]]$y.range[2]
g=g+ylim(0,gy)

#Handle the overflow by expanding the x-axis
g=g+scale_x_continuous(expand=c(0.1,0))

这看起来很复杂,我觉得这是一个相对简单的想法.我错过了什么吗？

谢谢!

---

编辑:截至2018年夏天,ggplot更新使上述修复不再起作用.目前(2018年8月)要从图中获得y-max,您现在需要执行以下操作.

GY = ggplot_build(克)$ $布局panel_scales_y [[1]] $ $范围范围[[2]]

Answer 1

我发现这个问题令人沮丧，然后阅读了 R 帮助文件expansion()。对此有一个很好的 ggplot 选项，它对方面友好、动态且简洁。

从帮助文件中引用：

乘法范围扩展因子的多向量。如果长度为 1，则刻度的下限和上限均向外扩展 mult。如果长度为 2，则下限由 mult[1] 扩展，上限由 mult[2] 扩展。

请注意，这add也是一个具有类似结构的选项。我会像这样解决这个问题：

ggplot(my.data, aes(x.var, y.var))+
  geom_point()+
  scale_y_continuous(limits = c(0, NA),
                     expand = expansion(mult = c(0, 0.1)))

喜欢这种方法的一个重要原因是，如果您的几何图形具有不同的美感（例如点和误差线）和带有自由尺度的面……您仍然可以利用 ggplot 巧妙的默认 y 轴行为，但强制 x 与 y 相交在每个面板中的 0 处，仍然可以看到最上面的数据点。

Answer 2

为什么不只是：

ggplot(my.data, aes(x.var, y.var))+
    geom_point()+
    scale_y_continuous(expand = c(0,0))+
    expand_limits(y = c(0,1.05 * max(my.data$y.var)))