格子，合并条纹

Question

我使用以下代码构建格子图

table.df<-means 
library(lattice)
library(gridExtra)
graph1<-barchart(value1~Var1|Var2+Var3,data=table.df, ylab=NULL)
graph2<-barchart(value2~Var1|Var2+Var3,data=table.df, ylab=NULL)
grid.arrange(graph1,graph2, nrow=2, ncol=2)

我正在尝试合并漫画条。例如，第一个图形中的第一个条带将合并为一个唯一的条带（normalVar3）。

有什么建议吗？

Answer 1

查看latticeExtra::useOuterStrips