Tiago,

obrigado por se oferecer a ajudar. Informo que encontrei a solução e compartilho com os demais integrantes da lista r-br.

Ressalto que o gráfico exibe pontos com cores e tamanhos segundo o quartil do dado observado.

Abraços,

Alex Santos

quantile(dadosT1$data)

points(dadosT1,xlab="Coordenada X (coluna)",ylab="Coordenada Y (linha)", pt.divide="quartiles")

legend(270,70, c("1º quartil", "2º quartil", "3º quartil", "4º quartil"),

col=c('black', 'black', 'black', 'black'), pt.bg=c('blue', 'green', 'yellow', 'red'), pch=c(21,21,21,21),

pt.cex=c(0.6,0.9,1.3,1.6),bty='0')

Dec 04, 2013; 8:21am

Tiago de Souza

Nos envie um CMR para que possamos tentar ajudá-lo.

Att.

Tiago.

########################################################

Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES

Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas

########################################################

Em 4 de dezembro de 2013 08:12, Alex <alxcart@gmail.com> escreveu:

Ao grupo r-br,
por favor, eu criei um gráfico de pontos onde o tamanho e cor de cada um é baseado no quartil ao qual ele pertence, o trecho do código está abaixo.
Entretanto estou com dificuldades de criar a legenda. Alguém poderia me orientar?

attach(dadosT1)

par(mfrow=c(1,1))
ramp<-colorRamp(c("yellow", "red"))
points(dadosT1,xlab="Coordenada X (coluna)",

ylab="Coordenada Y (linha)",
pt.divide="quartiles", col=rgb(ramp(seq(0,1, length=5)), max=255))

Desde já agradeço,
Alex Santos