Ops ali eu quis dizer CMR, Código minimo reproduzível :) Em 8 de novembro de 2011 09:44, Augusto Ribas <[email protected]> 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 <[email protected]> > 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: [email protected] ; [email protected]; [email protected] >> >> CV Lattes: http://lattes.cnpq.br/5350064124902777 >> >> >> >> >> >> >> >> >> >> >> _______________________________________________ >> R-br mailing list >> [email protected] >> 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 >
-- Grato Augusto C. A. Ribas Site Pessoal: http://augustoribas.heliohost.org Lattes: http://lattes.cnpq.br/7355685961127056 _______________________________________________ R-br mailing list [email protected] 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.
