R中的多面板标题

Question

我有一个关于R的超短问题

我的目标是为使用par生成的多面板图指定一个共同的标题,例如

par(mfrow=c(1,2))
plot(rnorm(1000))
plot(rnorm(1000))

因此,类似于绘图功能的"主要",但扩展到两个图.有没有规范的方法来做到这一点？

谢谢你的回答:-)

Answer 1

使用mtext选项outer:

set.seed(42)
oldpar <- par(mfrow=c(1,2), mar=c(3,3,1,1), oma=c(0,0,3,1))  ## oma creates space 
plot(cumsum(rnorm(100)), type='l', main="Plot A")
plot(cumsum(rnorm(100)), type='l', main="Plot B")
mtext("Now isn't this random", side=3, line=1, outer=TRUE, cex=2, font=2)
par(oldpar)