如何利用R语言中的ggplot2给柱形图添加显著性星号

将数据整理到excel

• 第一列是变量名

• 第二列是变量对应的数值

在excel将数据选中复制，然后运行代码

df<-read.table("clipboard",header=T)
library(ggplot2)
ggplot(df,aes(x,y))+
  geom_col(width = 0.5,aes(fill=x))+
  geom_segment(aes(x=1,xend=1,y=10,yend=12))+
  geom_segment(aes(x=1,xend=2,y=12,yend=12))+
  geom_segment(aes(x=2,xend=2,y=5,yend=12))+
  geom_text(aes(x=1.5,y=12.5),label="*")+
  theme_bw()+labs(x="",y="")+
  theme(legend.position = "none")

第一次使用R语言的话需要安装ggplot2

使用到的命令install.packages("ggplot2")

添加星号的位置在label参数后，对应着可以改成两个或者三个星号

线段是使用geom_segment()函数添加，可以根据自己的数据来修改。