我已经设法使用网格排列：绘制了一个2x2的图
library(gridExtra)
grid.arrange(p1,p3,p2,p4, ncol=2, nrow=2, top = "Daily QC: Blue")
这个多批次的主要标题非常小。有没有办法更改标题文本的大小和字体。
main=textGrob("Daily QC: Blue",gp=gpar(fontsize=20,font=3))
编辑使用gridExtra的v>=2.0.0，main已变为top（为了与bottom、left和right保持一致）。
由于grid和gridExtra两个包都发生了更改，当前答案已过时。库包grid也需要使用textGrob和gpar。
新代码应该包括两个包：
library(grid)
library(gridExtra)
grid.arrange(p1,p3,p2,p4, ncol=2, nrow=2,
top = textGrob("Daily QC: Blue",gp=gpar(fontsize=20,font=3)))