我正在尝试创建一个绘图网格,它周围应该有一个盒子,一个类似棋盘的标签(即顶部/底部的字母,侧面的数字),以及分隔两半网格的垂直线.
我希望使用刻面来完成它(或足够类似的东西),但是当给定大量图时,facet_grid 不会创建横向标签(如这里),它出现:
testdata <- cbind("ID"=c(rep(1:24, each=10)),
"TT"=c(rep(0:1, each=5)),
"RD"=c(seq(1:5)),
"DV"=rnorm(240, 10, 5))
testdata <- data.frame(testdata)
testplot <- ggplot(data=testdata, aes(x=RD, y=DV)) +
geom_line(colour="black") + geom_point() +
facet_wrap(TT ~ ID, ncol=4)
(facet_wrap 的另一个问题是它不能很好地处理我更喜欢的 ID ~ TT 排序,将这些值显示为 [1,0]、[1,1]、[2,0]、[2,1 ] 然后;而不是更可取的 [1,0], [2,0], [3,0], [1,1], [2,1]... 但这可以解决。)
我考虑过的另一个选择是使用box();但是,这仅适用于单个地块(使用 grid.arrange/arrangeGrob 创建对象不起作用)。
最终,我想要一个大致如下的情节。我会很高兴有任何建议!