Prezados, gostaria de fazer um gráfico no R, com os dados abaixo: d1 <- data.frame(X = 1:10, Y1 = c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4), Y2 = c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0)) O gráfico que gostaria de fazer é o mesmo que o gráfico de área do excel. Tentei fazer alguns gráficos, mas não ficou nem um pouco parecido. Primeiro tentei plotar duas linhas e depois preencher a área com uma cor. Não consegui. Alguém poderia me ajudar? Obrigado. Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068
Quando alguém diz que quer o mesmo que o Excel me causa um pouco de estranheza . Eu sinceramente não sei qual a utilidade de se preencher a área abaixo das séries. Penso que só as séries são suficientes. O mesmo para os gráficos de barras 3D ou até aqueles onde os blocos retangulares são substituídos por cones. Não vejo necessidade. Bem, o código abaixo não faz exatamente o que você precisa porque de fato eu não entendi o que você precisa. Mesmo assim, pode ser um ponto de partida. Pensou em polígonos com cores ou padrões então vá para a polygon(). d1 <- data.frame(X=1:10, Y1=c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4), Y2=c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0)) plot(Y2~Y1, d1) plot(Y2~X, d1) plot(c(Y1,Y2)~c(X,X), d1) with(d1, polygon(x=c(X,rev(X)), y=c(Y1, rep(min(Y1), length(Y1))), col="blue2")) with(d1, polygon(x=c(X,rev(X)), y=c(Y2, rep(min(Y2), length(Y2))), col="green")) À disposição. Walmes.
Walmes, obrigado e desculpe por não explicar melhor. O gráfico é para demonstrar o balanço hídrico de um solo, com excedente e déficit de agua no mesmo. Seria o mesmo desse link: http://www.cnpt.embrapa.br/imagens/p_do145-3-f1.png Lucas Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068 ----- Mensagem original -----
De: "walmes ." <walmeszeviani@gmail.com> Para: r-br@listas.c3sl.ufpr.br Enviadas: Quinta-feira, 14 de Agosto de 2014 13:11:18 Assunto: Re: [R-br] gráfico area
Quando alguém diz que quer o mesmo que o Excel me causa um pouco de estranheza . Eu sinceramente não sei qual a utilidade de se preencher a área abaixo das séries. Penso que só as séries são suficientes. O mesmo para os gráficos de barras 3D ou até aqueles onde os blocos retangulares são substituídos por cones. Não vejo necessidade. Bem, o código abaixo não faz exatamente o que você precisa porque de fato eu não entendi o que você precisa. Mesmo assim, pode ser um ponto de partida. Pensou em polígonos com cores ou padrões então vá para a polygon().
d1 <- data.frame(X=1:10, Y1=c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4), Y2=c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0))
plot(Y2~Y1, d1) plot(Y2~X, d1)
plot(c(Y1,Y2)~c(X,X), d1) with(d1, polygon(x=c(X,rev(X)), y=c(Y1, rep(min(Y1), length(Y1))), col="blue2")) with(d1, polygon(x=c(X,rev(X)), y=c(Y2, rep(min(Y2), length(Y2))), col="green"))
À disposição. Walmes. _______________________________________________ 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.
cada um gasta a tinta que tem.... Na versao original dos dados: d1 <- data.frame(X=1:10, Y1=c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4), Y2=c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0)) library(ggplot2) ggplot(d1) + geom_area(aes(x=X, y=Y1, fill='blue')) + geom_area(aes(x=X, y=Y2, fill='red')) Na versao na qual armazenam-se os dados de modo um pouco melhor: library(reshape2) dd <- melt(d1, measure.vars=c('Y1', 'Y2'), variable.name='group', value.name ='Y') ggplot(dd) + geom_area(alpha=.4, aes(x=X, y=Y, fill=group)) b Em 14 de agosto de 2014 13:19, <luc.souza@usp.br> escreveu:
Walmes, obrigado e desculpe por não explicar melhor. O gráfico é para demonstrar o balanço hídrico de um solo, com excedente e déficit de agua no mesmo. Seria o mesmo desse link: http://www.cnpt.embrapa.br/imagens/p_do145-3-f1.png
Lucas
Lucas F. de Souza Eng. Agrícola - CONAB M.Sc. Produção Vegetal - UENF Doutor em Agrometeorologia - ESALQ/USP tel: (19) 98160-7068
------------------------------
*De: *"walmes ." <walmeszeviani@gmail.com> *Para: *r-br@listas.c3sl.ufpr.br *Enviadas: *Quinta-feira, 14 de Agosto de 2014 13:11:18 *Assunto: *Re: [R-br] gráfico area
Quando alguém diz que quer o mesmo que o Excel me causa um pouco de estranheza . Eu sinceramente não sei qual a utilidade de se preencher a área abaixo das séries. Penso que só as séries são suficientes. O mesmo para os gráficos de barras 3D ou até aqueles onde os blocos retangulares são substituídos por cones. Não vejo necessidade. Bem, o código abaixo não faz exatamente o que você precisa porque de fato eu não entendi o que você precisa. Mesmo assim, pode ser um ponto de partida. Pensou em polígonos com cores ou padrões então vá para a polygon().
d1 <- data.frame(X=1:10, Y1=c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4), Y2=c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0))
plot(Y2~Y1, d1) plot(Y2~X, d1)
plot(c(Y1,Y2)~c(X,X), d1) with(d1, polygon(x=c(X,rev(X)), y=c(Y1, rep(min(Y1), length(Y1))), col="blue2")) with(d1, polygon(x=c(X,rev(X)), y=c(Y2, rep(min(Y2), length(Y2))), col="green"))
À disposição. Walmes.
_______________________________________________ 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.
_______________________________________________ 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.
-- [image: Benilton Carvalho on about.me] Benilton Carvalho about.me/benilton <http://about.me/benilton>
participantes (3)
-
Benilton Carvalho -
luc.souza＠usp.br -
walmes .