图例中点的颜色修改及多图例位置调换

---------------------------------个人记录 -----------------------------------

ggplot(plot.data,aes(x=Description,y=Cluster))+ geom_point(aes(color=Count,size=-log10(pvalue)))+
theme_bw()+
scale_x_discrete(position = "top")+
theme(panel.border = element_rect(color="black",fill=NA),legend.key = element_rect(size = 10),
      axis.text.x=element_text(angle=55,hjust=0),axis.title.x = element_blank(),
     plot.margin=unit(c(0.2,2,0.2,0.2),"cm"),legend.title = element_text(size=9),legend.position = "bottom")+
scale_color_gradient(low = "#6699CC",high = "#FF0000",position="top")+
scale_size(range = c(0,8))+
labs(color="Enrichment")

size图例颜色是黑的，改成红色，用guide_legend(override.aes)更改

guides(

size = guide_legend(override.aes = list(color='red'), #override.aes更改图例的默认颜色。

keywidth = 0.5))

 调换两个图例的顺序，用guide_legend(order更改)

guides(color = guide_colorbar(order = 1),size = guide_legend(override.aes = list(color='red'),keywidth = 0.5),order=2)