[R-br] Adicionar linhas em xyplot multipaneis

[Benilton Carvalho]

Algumas alternativas:


library(ggplot2)

## Ex1:
## dados e' o seu conjunto de dados original
ggplot(dados, aes(DATA)) + geom_ribbon(aes(ymax=TEMPMAX, ymin=TEMPMIN),
fill='grey70', colour='black') + geom_line(aes(y=TEMPMED))
## nesse caso vc faria dois graficos separados

## Ex2:
## da e' o data.frame criado pelo Walmes
ggplot(da, aes(DATA)) + geom_ribbon(aes(ymax=max, ymin=min), fill='grey70',
colour='black') + geom_line(aes(y=med)) + facet_wrap(~var, scales='free_y')

##Ex3:
## da e' o data.frame do Walmes
ggplot(da, aes(DATA)) + geom_ribbon(aes(ymax=max, ymin=min),
colour='black', alpha=0) + geom_line(aes(y=med)) + facet_wrap(~var,
scales='free_y')

##Ex4:
## de novo
ggplot(da, aes(DATA)) + geom_ribbon(aes(ymax=max, ymin=min), fill='grey70')
+ geom_line(aes(y=med)) + facet_wrap(~var, scales='free_y')

Em 16 de outubro de 2014 09:55, Fernando Souza <nandodesouza em gmail.com>
escreveu:

>  Obrigado Walmes! Fico impressionado com a forma como você simplifica as
> coisas.
>
> Abraços
>
> On 15-10-2014 23:37, walmes . wrote:
>
>  Segue minha sugestão.
>
> require(latticeExtra)
>
> ## É possível fazer com layer mais aí tem-se que estar atento à
> ## amplitude dos eixos.
>
> xyplot(URAMED+TEMPMED~DATA, dados,
>        outer=TRUE, scales=list(y="free"))+
>            layer(with(dados, panel.lines(URAMIN~DATA)), packets=1)+
>            layer(with(dados, panel.lines(URAMAX~DATA)), packets=1)
>
> ## Melhor e dispor os dados de uma forma mais conveniente.
> str(dados)
>
> tem <- subset(dados, select=c(DATA, TEMPMED, TEMPMIN, TEMPMAX))
> umi <- subset(dados, select=c(DATA, URAMED, URAMIN, URAMAX))
> names(tem)[2:4] <- names(umi)[2:4] <- c("med","min","max")
> tem$var <- "temp"
> umi$var <- "umid"
>
> da <- rbind(tem, umi)
> str(da)
>
> xyplot(med+min+max~DATA|var, data=da, scales=list(y="free"),
>        type="l", lty=c(1,2,2), col=c("black","gray50","gray50"))
>
> À disposição.
> Walmes.
>
>  ​
>
>
> _______________________________________________
> R-br mailing listR-br em listas.c3sl.ufpr.brhttps://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.
>
>
>
> _______________________________________________
> 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/20141016/3fbe0490/attachment.html>