使用R语言ggplot2制作图表（第3版）

    ??geom_label()可以查看其帮助文档
    ##Examples
    p <- ggplot(mtcars, aes(wt, mpg, label = rownames(mtcars)))###建立一个新的画板，标记mtcars的行名
    p + geom_text()##展示待标记的文本内容，待标记的文本坐标是(wt,mpg)  见图1
    
    
    # Labels with background
    p +  geom_label(aes(fill = factor(cyl)), colour = "white",family = "Times New Roman", fontface = "bold",check_overlab=TRUE)  ###带背景标注,背景填充白色，新罗马黑体字体，重叠去除，见图2
    
    # Set aesthetics to fixed value
    p + geom_point(color="green",aes(size = wt),pch=8) + ##点的颜色为绿色，点的大小按照wt进行分配
      geom_text(hjust =