我想知道是否可以在图表顶部和两个条形图之间注释 p 值。就我而言,使用 ggplot2,我有一个具有 2 个条件(传代和分离)的多面图,并且在每个条件下,有 3 个级别/3 个条形图(GA、CH、KO)。如果可能的话,我有一些来自成对比较的 p 值(GA 与 CH、CH 与 KO、GA 与 KO),我想在图表本身上显示这些 p 值。
我的 ggplot 脚本如下:
#plot
dev.new()
accentrating_comb <- ggplot(ch_ko_am_comb, aes(x=speaker_type, y=Mean, fill=speaker_type)) +
geom_bar(position=position_dodge(width=1), stat="identity", colour="black", size=.5) +
geom_errorbar(aes(ymin=cllo, ymax=clup), colour="black", size=.3, width=.2, position=position_dodge(width=1)) +
geom_text(aes(label=lable), colour="black", vjust=-0.5, size=10, hjust=-2) +
coord_cartesian(ylim=c(0,10)) +
ylab("Mean Accent Rating") +
scale_fill_brewer(type = "div", palette = "Greys") +
guides(fill=guide_legend("Accent")) +
theme_bw() +
theme(plot.title = element_text(size = 22), axis.title.x = element_blank(), axis.title.y = element_text(size = 14), axis.line = element_line(colour = "black"), panel.grid.major = element_blank(), panel.grid.minor = element_blank(), strip.text.x = element_text(size = 14), axis.text.x = element_text(size=14), legend.title=element_text(size=14), legend.text=element_text(size=14), panel.margin.x=unit(20,"pt")) +
facet_wrap( ~ condition ) #this creates multiple panels
print(accentrating_comb)
#dev.off()