[R-br] Gráfico de pontos

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