在ggplot2中注释轴

Question

我正在寻找在ggplot2中注释轴的方法。可以在此处找到问题的示例：http://learnr.wordpress.com/2009/09/24/ggplot2-back-to-back-bar-charts。

图表的y轴（链接中的示例图表）有一个注释:(百万欧元）。有没有办法在ggplot2中创建这种类型的注释？查看文档没有明显的方法，因为ggplot没有明确允许您将对象放在绘图区域之外。但也许有一些解决方法？

我想到的一种可能的解决方法是使用秤：

data=data.frame(x=1:10,y=1:10)
qplot(x=x,y=y,data=data)+scale_y_continuous(breaks=10.1,label="Millions")

但是如何删除勾？而且似乎由于ggplot不支持多个音阶，我需要抓取scale_y_continuous的输出，当它自动计算音阶然后手动添加我的自定义音符和标签。也许有更好的方法？

Answer 1

也许grid.text()：

grid.text("label", x = unit(xpos, "npc"), y = unit(ypos, "npc"))

具有xpos和ypos的适当值。