r - 如何将文本放置在 ggplot2 生成的绘图下方 1 英寸处？

Question

我需要找到一种方法将文本放置在绘图下方 1 英寸处。即使我更改了绘图的边距或使用了不同的数据，我也需要该文本位于绘图下方 1 英寸处。我一直在用修改过的 x 和 y 值调用网格文本，但我想要一些能适应 ggplot 尺寸的东西。另一种方法是使用 grobs(参见 related post )，但这需要根据数据设置 Y 位置。
下面是基本代码:

library(ggplot2)
test= data.frame(
x = c(1:10 ),
y = c(1:10)
)

qplot(x=x, y=y, data=test)+  
opts(plot.margin = unit(c(1,3,8,1), "lines")) +  
geom_line()

谢谢。

Answer 1

如果您知道在底部边距中添加了多少行(在本例中为 8 行)，那么我认为您只需使用一些 unit 即可完成此操作。数学:

grid.text("Here",y = unit(8,"lines") - unit(1,"inches"))