trellis.focus com grid.arrange

Se tenho library(Matrix) library(lattice) 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 grid.arrange(image(m1), image(m2), ncol=2) Como faco para panel.text() funcionar no plot da esquerda? Elias

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.

consegui mexendo no panel da levelplot. Sua solucao é muuuito mais facil :) Valeu! On 03/02/2017 12:20, Walmes Zeviani wrote:
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.

Trocando a ordem para ficar como eu queria (na primeira imagem): 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 p1 <- image(m1) + layer(panel.text(x = 3, y = 3, labels = "Olá mundo.", col = "red")) grid.arrange(p1, image(m2), ncol = 2)
participantes (2)
-
Elias T. Krainski
-
Walmes Zeviani