Hi, all.

I'd like to add legend on my graph but I can't. My code is follows.

library(ggplot2)
score1<-rnorm(100,0,5)
score2<-rnorm(400,10,15)
mydata<-data.frame(score1,score2)
ggplot(mydata,aes(y=score2,x=score1))+geom_point()+stat_quantile(quantiles=c(0.50),col="red")+stat_quantile(quantiles=c(0.90),col="blue",size=2)

I like to add legend indicating the information of "thick-blue line = 90%
line" & "thin-red line = 50% line".
Of course, I hope this legend should have same visual line with the plot.
I tried to use 'scale_colour_manual' function, but it did not work.

Could anyone give a advice for me?

- YNK

	[[alternative HTML version deleted]]

