
3 Fev
2017
3 Fev
'17
14:20
Faça o panel.text() antes. Veja CMR. library(Matrix) library(latticeExtra) library(gridExtra) m1 <- sparseMatrix(i = c(1, 1, 2, 3, 4, 4, 4, 5), j = c(3, 4, 4, 1, 2, 3, 5, 4), x = 1:8) m2 <- m1/2 p <- image(m2) + layer(panel.text(x = 3, y = 3, labels = "Olá mundo.", col = "red")) grid.arrange(image(m1), p, ncol = 2) À disposição. Walmes.