是否可以使用ggplot在facets之間顯示符號？

Question

我希望把我的符號面之間的ggplot，來顯示不同方面之間的關係，例如：

□ + □ - □ = □ 

每平方米是一個方面。這可能嗎？

Answer 1

可以作爲後處理的gtable添加grobs，

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)