如何在facet ggplot的空白区域定位注释文本 [英] How to position annotate text in the blank area of facet ggplot

问题描述

如何在奇数刻面 ggplot 的空白处注释一些文本.让我们有一个多面的 ggplot 数据如下，有 2 行和 2 列.所以有空格代替了第 2 行第 2 列.

How to annotate some text in the blank space within a odd numbered faceted ggplot. Lets have a faceted ggplot with data as below with with 2 rows and 2 columns. So there is blank space in place of 2 row, 2nd column.

  df<- data.frame(Ara = rep("XTX", each = 3),
              Len = c(744, 750, 755),
              Mon = c("Sep", "Oct","Nov"),
              Value=c(11.224,10.15,4.23))
  df
  facetplot<-ggplot(df, aes(x=Value, y=Len, shape=Ara))+
      geom_point(size=5.0)+
      theme(legend.position = c(.7, .4), legend.direction="vertical")+
      facet_wrap(~Mon,scales="free_x", nrow=2)
  facetplot

现在我试图在空间中注释一些文本，但不能(如图像中的红色所写).我正在为带注释的文本寻找类似于 legend.position 的东西.有没有人对此有任何想法.或者可能的解决方法是什么.谢谢.

Now i am trying to annotate some text in the space but could not ( as written in red in the image). I am looking for something similar to legend.position for annotated text. Do anyone has any idea on this.Or what would be the possible work around. Thank you.

推荐答案

创建情节后，只需使用

print(facetplot)
grid.text("your text", x = 0.75, y = 0.25)

有关定位的详细信息，请参阅 ?grid.text.默认坐标系是整个屏幕设备，左下角为 (0,0)，右上角为 (1,1).

See ?grid.text for details on positioning. The default coordinate system is the entire screen device with (0,0) as the lower left and (1,1) as the upper right.

这篇关于如何在facet ggplot的空白区域定位注释文本的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！