[R-br] scatterplot com gradiente de cores

[Rodrigo Plei]

Prezado Augusto,

Muito obrigado!

Vou tentar esse script agora mesmo!

Rodrigo

Em 8 de novembro de 2011 10:44, Augusto Ribas <ribas.aca em gmail.com>escreveu:

> Vc pode usar o argumento col do plot para selecionar as cores, so
> transformar o dia na cor desejada.
> Coloquei um +1 do lado dos valores de dia que o 0 é cor branca então
> fica "invisível" no plot.
> Depois fazer a legenda.
> Consulte a documentação dos parâmetros pra gráficos pra entender
> melhor o argumento col e como fazer a legenda.
> Segue um exemplinho, espero que seja o que necessita.
> Se precisar de algo mais especifico pede usando esse CMD de partida :)
>
>
> #Exemplo
> Day<-c(0,0,0,0,1,1,1,1,2,2,2)
> Lat<-c(23.3,23.35,23.4,23.4,24.2,24.1,24.4,24.36,24.5,25.2,25.3)
> Long<-c(47.2,47.0,47.0,47.3,47.5,47.23,47.8,47.85,47.8,48.1,48.2)
> dados<-data.frame(cbind(Day,Lat,Long))
> dados
> #grafico
> plot(Long~Lat,pch=16,col=Day+1)
> #legenda
> legend("topleft",legend=c("Dia 0","Dia 1","Dia 2"),pch=16,col=c(1,2,3))
>
> Em 8 de novembro de 2011 09:26, Rodrigo Plei <rodrigo.plei em gmail.com>
> escreveu:
> > Bom dia, lista.
> > Tenho uma tabela de dados de posições geográficas (lat-long) por dia para
> > uma população de larvas de peixes, que tem essa cara:
> >
> > Day    Lat    Long
> > 0        23.3    47.2
> > 0        23.35  47.0
> > 0        23.4    47.0
> > 0        23.4    47.3
> > 1        24.2    47.5
> > 1        24.1    47.23
> > 1        24.4    47.8
> > 1        24.36   47.85
> > 2        24.5     47.8
> > 2        25.2     48.1
> > 2        25.3     48.2
> > .
> > .
> > Ou seja: cada linha corresponde a posição de uma larva em um determinado
> > dia.
> > Gostaria de plotar uma dispersão simples a trajetória de todas as larvas
> > para todo o período estudado, mas a idéia é que cada ponto tenha uma cor
> de
> > acordo com a idade (dia), de forma a formar um gradiente com as cores do
> > arco-iris. E também queria colocar uma barra de legenda para esse
> gradiente
> > (por exemplo: dia 0 = amarelo e dia 30: vermelho.
> > Alguém pode me dar uma dica, ou ao menos indicar um pacote que permita
> fazer
> > isso?
> > Desde já, grato.
> > Rodrigo
> > --
> > =8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->
> >
> > Rodrigo Silvestre Martins, PhD
> > Bolsista FAPESP Pós-Doutorado
> >
> > Laboratório de Ecossistemas Pesqueiros (LabPesq)
> > Universidade de São Paulo, Instituto Oceanográfico
> > Praça do Oceanográfico, 191. Cidade Universitaria (sala 107-A/B)
> > Butantã - São Paulo/SP, Brasil
> > 05508-900
> > Tel: +55 11 3091 6549
> > Email: rodrigo.plei em gmail.com ; ocersm em lycos.com; rsmartins em usp.br
> >
> > CV Lattes: http://lattes.cnpq.br/5350064124902777
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > _______________________________________________
> > 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.
> >
>
>
>
> --
> Grato
> Augusto C. A. Ribas
>
> Site Pessoal: http://augustoribas.heliohost.org
> Lattes: http://lattes.cnpq.br/7355685961127056
> _______________________________________________
> 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.
>



-- 
=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->=8-->

Rodrigo Silvestre Martins, PhD
Bolsista FAPESP Pós-Doutorado

Laboratório de Ecossistemas Pesqueiros (LabPesq)
Universidade de São Paulo, Instituto Oceanográfico
Praça do Oceanográfico, 191. Cidade Universitaria (sala 107-A/B)
Butantã - São Paulo/SP, Brasil
05508-900
Tel: +55 11 3091 6549
Email: rodrigo.plei em gmail.com ; ocersm em lycos.com; rsmartins em usp.br

CV Lattes: http://lattes.cnpq.br/5350064124902777
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20111108/a42e2738/attachment.html>