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