使用facet_grid为每个单独的图添加标签

时间:2019-05-24 16:30:13

标签: r ggplot2 facet-grid

我正在尝试在以下facet_grid的每个图中添加标签(大写字母):

p <- ggplot(mpg, aes(displ, cty)) + geom_point()
p + facet_grid(drv ~ cyl)

这将输出: enter image description here

我想拥有的是: enter image description here 我遇到的主要问题是1)我的Y轴可以自由缩放,因此无法输入每个坐标的特定坐标。 2)我不确定我应该在这里搜索哪些关键字,我敢肯定facet_grid中可以找到一种方法,但是我找不到它。

1 个答案:

答案 0 :(得分:1)

这个怎么样?将标签的位置固定在每个绘图面板的左上角:

 p + facet_grid(drv ~ cyl)+ annotate('text', label = LETTERS[1:12], x=min(mpg$displ), y=max(mpg$cty))

您可以随意替换标签= c('aaa','bb','fff'....),但必须与面图数量相同。

您还可以使用以下方法来微调标签位置,使其与两个轴成比例:

x=mean(mpg$displ)*0.6, y=max(mpg$cty)*0.97