rm(list = ls())#清空当前的工作环境
options(stringsAsFactors = F)#不以因子变量读取
options(scipen = 20)#不以科学计数法显示
library...= 0.5),
legend.title = element_blank(),
legend.text = element_text(size=8))
p5
结果如下...,F显示p value
tip_length=c(0,0,0,0,0,0,0,0,0,0,0,0), # 修改显著性线两端的长短..."black",size=0.9))
B
fig2c[[i]] <- B
}
p_c <- wrap_plots(fig2c,guides="collect")
p_c
结果如下...,F显示p value
tip_length=c(0,0,0,0,0,0,0,0,0,0,0,0), # 修改显著性线两端的长短