Pode-se usar a layout() assim

p <- hist(rnorm(100))

l <- rbind(c(1,1,2,2),

c(0,3,3,0))

layout(l)

layout.show(max(l))

plot(p)

layout(1)

Os números representam que posições serão ocupadas por cada gráfico na sequência. O valor 0 indica posições vazias. Leia a documentação para mais detalhes.

À disposição.

Walmes.