Многопанельные заголовки в R

Question

У меня очень короткий вопрос о R

Моя цель - назначить общий заголовок многопанельному графику, сгенерированному с использованием пар, например,

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

Итак, что-то вроде «main» для функции plot, но распространяется на оба графика. Есть ли канонический способ сделать это?

Спасибо за любой ответ: -)

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)