2010-01-20 44 views
7

Tengo una pregunta corta de ultra cerca de Rtítulos multipaneles en I

Mi objetivo es asignar un título común a una parcela de paneles múltiples generada mediante el par, por ejemplo,

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

Por lo tanto, algo así como "principal" para la función de trazado, pero se extiende a ambos trazados. ¿Hay una manera canónica de hacer esto?

Gracias por cualquier respuesta :-)

+0

Qué casualidad, vi este http://stackoverflow.com/questions/1241184/overall-title- para trazar-ventana hoy por la mañana. – Marek

+0

Eso también es una solución, y sí debería usar Rlattice con más frecuencia. –

Respuesta

12

Uso mtext con la opción 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) 
+1

Eres mi héroe :-D –

+4

Si mi esposa lo dijera con más frecuencia. –

+0

eddelbuettel ¿Su esposa no aprecia los "títulos de varios paneles"? – Shane