[R-br] Multiplots usando lattice

[salah]

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
>
> <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> 
> 	Livre de vírus. www.avast.com 
> <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>. 
>
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em 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.

-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20160513/e3b2a537/attachment.html>