[R-br] Ajuda com gráficos no R - Diagrama volumétrico dos espaços no solo

[Benilton Carvalho]

?legend

usando os comandos q o Walmes te enviou, uma tentativa natural e':

legend('right', c('txtA', 'txtB', 'txtC'), fill=c('gray90', 'black',
'blue'), angle=c(0, 33, 55), density=c(100, 3, 12))


Em 14 de dezembro de 2013 12:31, Wenceslau Teixeira <wgt007 em gmail.com>escreveu:

> Caro Walnes,
>
>
> Agradeço a atenção,excelente, esta isto mesmo que precisávamos.
> Agora só me falta descobrir como fazer uma legenda usando os "símbolos"
> usados para diferenciar os poligonos. Qualquer dica é bem vinda
>
> Sds gráficas
>
> Wenceslau
>
>
> Message: 11
> Date: Wed, 11 Dec 2013 19:56:22 -0200
> From: "walmes ." <walmeszeviani em gmail.com>
> To: "r-br em listas.c3sl.ufpr.br" <r-br em listas.c3sl.ufpr.br>
> Subject: Re: [R-br] Ajuda com gráficos no R - Diagrama volumétrico dos
>         espaços no solo
> Message-ID:
>         <CAFU=EkY=
> nDFvVPz3vAc1txSYxDURzv1xCPodDjLHNpXDZ9kU7Q em mail.gmail.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> A partir dessa tabela que você forneceu, você pode criar as listas que
> demarcam os vértices dos polígonos que representam cada porção do solo.
> Algo como
>
> plot(x=NULL, y=NULL, xlim=c(0,1), ylim=c(1.2,0),
>      xlab="Umidade (%)", ylab="Profundidade (m)")
>
> ## points(expand.grid(seq(0,1,0.
> 1), seq(0,1.2,0.2)))
> ## l <- locator()
> ## lines(l)
> ## l <- lapply(l, round, digits=1)
> ## dput(l)
>
> l1 <- list(x = c(0, 0.2, 0.2, 0.4, 0.4, 0.5, 0.5, 0),
>            y = c(1.2, 1.2, 0.8, 0.8, 0.4, 0.4, 0, 0))
> l2 <- list(x = c(0.2, 0.7, 0.7, 0.6, 0.6, 0.6, 0.5,
>                0.5, 0.4, 0.4, 0.2, 0.2),
>            y = c(1.2, 1.2, 0.8, 0.8, 0.6, 0, 0, 0.4,
>                0.4, 0.8, 0.8, 1.2))
> l3 <- list(x = c(0.7, 1, 1, 0.6, 0.6, 0.7),
>            y = c(1.2, 1.2, 0, 0, 0.8, 0.8))
>
> polygon(l1$x, l1$y, col="gray90")
> polygon(l2$x, l2$y, density=3, angle=33)
> polygon(l3$x, l3$y, density=12, angle=55, col="blue")
>
>
> À disposição.
> Walmes.
>
>
> --
> Wenceslau Teixeira
>
> wgt007 em gmail.com
> skype: wgt007
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> _______________________________________________
> 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/20131214/558be745/attachment.html>