请教个画图的问题

我用par(mfrow=c(3,2))画多个图，如何设置一个主标题，即是这6张图的主标题，在最上面居中显示，而不是在每一张小图的主标题

par(mfrow=c(3,2), oma=c(3,3,4,0), mar=c(4,2,1,1), cex=0.6)
for(i in 1:6) plot(rnorm(i))
mtext("Title", 3, 1, outer=TRUE, cex=2)

[未知用户]

谢谢，回头研究下