Skip to content
Prev 86511 / 398513 Next

common title for graphs in a (1x2) layout

Rodrigo Tsai wrote:
RSiteSearch("Overall Title")

def.par <- par(no.readonly = TRUE)

par(oma = c(0, 0, 3, 0))

nf <- layout(matrix(c(1,2), 1,2,byrow=T), c(1,1), c(1,1), T)

layout.show(nf)

plot(rnorm(10,0,1))

plot(rnorm(10,0,0.1))

mtext("Centered Overall Title", outer = TRUE)

par(def.par)

Or without layout(), something like this:

par(mfrow=c(1,2), oma=c(0,0,2,0))
plot(1:10)
plot(1:10)
title("Centered Overall Title", outer=TRUE)