Em 23 de maio de 2013 11:02, Rodrigo Coster <rcoster@gmail.com> escreveu:

layout(matrix(c(1:4,5,5), 2))

for (i in 1:4) {

 plot(rnorm(10^i), col=i, pch=12)

}

plot(1, type='n', axes=F, xlab='', ylab='')

legend('center', paste0('10^', 1:4), col=1:4, pch=12)