是否可以使用ggplot在facet之间显示符号？

Question

我想在ggplot中将符号放在我的facet之间，以便可视化不同方面之间的关系，例如：

□ + □ - □ = □

每个方格都是一个方面。这可能吗？

Answer 1

您可以将grobs添加到gtable作为后处理，

library(ggplot2)
library(gtable)
library(grid)

p <- ggplot(data.frame(f=1:2)) + facet_wrap(~f) 

g <- ggplotGrob(p)
pan <- g$layout[grepl("panel", g$layout$name),]
g <- gtable_add_cols(g, unit(2,"line"), pos = min(pan$l)+1)
g <- gtable_add_grob(g, textGrob("+", gp=gpar(cex=2)), l = min(pan$l)+2, t=unique(pan$t))

grid.newpage()
grid.draw(g)