[R-br] xyplot e repeticao

[Luís Gustavo]

Elias,

Não saberia fazer usando xyplot, mas com função ggplot2::qplot eu faria
assim:

xyl = lapply(1:4, function(i)
  data.frame(x=1:100, y=dnorm(1:100,50,10*i), g = paste0("Grupo ",i)))

xyd <- do.call(rbind, xyl)

library(ggplot2)
qplot(x, y, data = xyd, geom = "path") + facet_wrap(~g)

Abraço


Em 19 de novembro de 2013 07:51, Elias T Krainski <
eliaskrainski em yahoo.com.br> escreveu:

> Pessoal,
>
> ##  como fazer repeticao com xyplot para colocar numa mesma janela?
>
> xyl = lapply(1:4, function(i)
>   data.frame(x=1:100, y=dnorm(1:100,50,10*i)))
>
> require(lattice); require(gridExtra)
> grid.arrange(xyplot(y~x, xyl[[1]], panel='llines'),
>              xyplot(y~x, xyl[[2]], panel='llines'),
>              xyplot(y~x, xyl[[3]], panel='llines'),
>              xyplot(y~x, xyl[[4]], panel='llines'), nrow=2)
>
> ##  como evitar repetir essas linhas para cada elemento?
>
> ##  uma forma que sei e' assim:
>
> do.call(function(...) grid.arrange(...),
>   lapply(xyl, function(d) xyplot(y~x,d, panel='llines')))
>
> ## mas neste caso as escalas sao diferentes...
> _______________________________________________
> 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.
>



-- 
Luís Gustavo Silva e Silva
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20131119/7315df8f/attachment.html>