如何使用 annotate 和 ggarange R 创建注释

How to create annotation with annotate and ggarange R

提问人:oceanpath 提问时间:1/14/2023 最后编辑:kjetil b halvorsenoceanpath 更新时间:1/16/2023 访问量:28

问:

我需要在我的共享标签上写一些文本。

我的图中有 4 个子图,它们共享相同的标签轴,所以我想在 Y 标签上添加一些注释(还有 X 标签,但我管理的 x 标签从所有图中排除了 x 标签,除了最后一个)。

plot

我尝试过注释功能,但似乎没有任何变化。

a <- ggarrange(pet, a63, a64, a65,
      labels = c(" Polietileno Tereftalato (PET)", "Amostra 63", 
                 "Amostra 64", "Amostra 65"),
      ncol = 1, nrow = 4, label.x=0.18, label.y= 1, align ="v", 
      vjust=2, hjust=0.2, 
      legend = "bottom") 
a + annotate("text", x = 0, y = 25, label ="Absorbância")
a
R 文本 注释

评论


答: 暂无答案