如何将文本正好放在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"))