我正在使用以下代码构建晶格图
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)。
有什么建议吗？