(相关资料图)

library(ggrepel)library(ggplot2)ggplot(data=mtcars,aes(x=wt,y=mpg))+geom_point(aes(size=disp,fill=disp),shape=21,color=