Olá Marcos

Talvez este exemplo lhe ajude

library(lattice)

# Data
w <- as.matrix(dist(Loblolly))
x <- as.matrix(dist(HairEyeColor))
y <- as.matrix(dist(rock))
z <- as.matrix(dist(women))

# Plot assignments
pw <- levelplot(w, scales = list(draw = FALSE)) # "scales..." removes axes
px <- levelplot(x, scales = list(draw = FALSE))
py <- levelplot(y, scales = list(draw = FALSE))
pz <- levelplot(z, scales = list(draw = FALSE))

# Plot prints
print(pw, split = c(1, 1, 2, 2), more = TRUE)
print(px, split = c(2, 1, 2, 2), more = TRUE)
print(py, split = c(1, 2, 2, 2), more = TRUE)
print(pz, split = c(2, 2, 2, 2), more = FALSE) # more = FALSE is redundant

retirado de http://stackoverflow.com/questions/2540129/lattice-multiple-plots-in-one-window

saudações

Em 13/05/2016 00:14, marcos paulo escreveu:

Pessoal estou querendo plotar 4 gráficos na mesma janela gráfica,
usando o pacote lattice pra confecção desses plots. Porém não estou conseguindo colocar mais que dois na mesma janela, usando a função print.

Segue exemplo:

g1<- xyplot(NDVI~DAE|Cultivar, data=dados, col=1, layout=c(5,1),

type=c("p","r"),

xlab="DAE", ylab="NDVI",

main='Vitrine 2014/2016',

strip=strip.custom(bg="gray90"))

g2<-xyplot(NDVI~IAF|Cultivar, data=dados, col=1, layout=c(5,1),

type=c("p","r"),

xlab="IAF", ylab="NDVI",

strip=strip.custom(bg="gray90"))

g3<-xyplot(Chl~DAE|Cultivar, data=dados, col=1, layout=c(5,1),

type=c("p","r"),

xlab="DAE", ylab="Clorofila",

strip=strip.custom(bg="gray90"))

g4<-xyplot(Chl~IAF|Cultivar, data=dados, col=1, layout=c(5,1),

type=c("p","r"),

xlab="IAF", ylab="Clorofila",

strip=strip.custom(bg="gray90"))

print(g1, split=c(1,1,1,4), more=TRUE)

print(g2, split=c(1,2,1,4))

print(g3, split=c(1,3,1,4))

print(g4, split=c(1,4,1,4))

Cordialmente, Marcos Paulo.

Técnico Agrícola em Zootecnia
Bacharel em Agronomia

Mestrando em Produção Vegetal - Universidade Federal de Goiás

Estagiário de Pós-Graduação da Embrapa Arroz e Feijão/CNPAF-Santo Antônio de Goiás-GO

Contato: (62) 85075783

http://lattes.cnpq.br/4322347592884852

Livre de vírus. www.avast.com.
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.