Fronteras alrededor de grupos de trazados

Question

Tengo 16 trazados en una página, organizados en una cuadrícula de 4x4. Me gustaría tener un borde alrededor de cada conjunto de 2x2, pero no puedo encontrar la forma de hacerlo.

Inicialmente utilicé layout(matrix(c(1,2,5,6,3,4,7,8,9,10,13,14,11,12,15,16), 4, 4, byrow=TRUE)) para crear el diseño correcto, pero, hasta donde yo sé, no hay forma de crear márgenes que se extiendan más allá del gráfico actual y cualquier diagrama posterior que el margen se superponga.

El segundo enfoque que probé fue usar split.screen(), pensando que cualquier configuración oma() solo se aplicaría a la pantalla actual, sin embargo, parece aplicarse a toda la ventana; por ejemplo, el siguiente código produce un borde en el exterior de toda el área de visualización, no screen(1):

depths <- c(1:10) 
split.screen(c(2,2)) 
screen(1) 
par(oma=c(1,1,1,1)) 
plot(depths) 
box("inner", lty="dotted", col="green") 

Tratando diversas cosas, ya sea con o box("inner")box("outer") después de configurar los ajustes oma no crea el resultado deseado.

¿Hay algún otro enfoque obvio que debería intentar?

Gracias,
Chris

Answer 1

Aquí es una forma mediante la disposición:

layout(matrix(c(1,2,5,6,3,4,7,8,9,10,13,14,11,12,15,16), 4, 4, byrow=TRUE)) 
replicate(16, hist(rnorm(100))) 
par(xpd=NA) 
rect(grconvertX(0.005, from='ndc'), grconvertY(0.505, from='ndc'), 
    grconvertX(0.495, from='ndc'), grconvertY(0.995, from='ndc')) 
rect(grconvertX(0.005, from='ndc'), grconvertY(0.005, from='ndc'), 
    grconvertX(0.495, from='ndc'), grconvertY(0.495, from='ndc')) 
rect(grconvertX(0.505, from='ndc'), grconvertY(0.505, from='ndc'), 
    grconvertX(0.995, from='ndc'), grconvertY(0.995, from='ndc')) 
rect(grconvertX(0.505, from='ndc'), grconvertY(0.005, from='ndc'), 
    grconvertX(0.995, from='ndc'), grconvertY(0.495, from='ndc')) 

ajustarlo a sus preferencias.

Answer 2

Trate de usar box("figure"):

depths <- c(1:10) 
split.screen(c(2,2)) 
screen(1) 
box("figure") 
split.screen(c(2,2)) 
par(cex=0.5) 
screen(5) 
plot(depths)