ggplot()+geom_point(data=dayclose, aes(x=1:nrow(dayclose), y=close, colour=value1, size=size1), alpha=0.5)+
    scale_colour_gradientn(colours=r)+theme(legend.title=element_blank())

用上面这段代码出的一张图，但我只想保留下面的颜色legend，删除上面size的legend。通过哪个参数设置？