介绍

对不同分页界面的分组数据添加显著性标记符号，虽然也可以通过ggpubr包的stat_compare_means()添加分组显著性标记符号，但它要求x轴必须是分组变量，不能对fill映射出来的分组做处理。为应对不同分组的fill映射分组，我们需要另寻他法。本文通过geom_text, geom_segment函数添加分组显著性标记。

加载R包

library(ggplot2)
library(tibble)
library(dplyr)
library(Rmisc)

导入数据

dat <- read.table("../datset/butterflies.txt", header = T, sep = " ")
glimpse(dat)

汇总数据

datsum <- summarySE(data = dat, measurevar = "winglen", 
                     groupvars = c("spp", "sex", "region"