【R语言 | 如何绘制带组内差异比较的柱形图】

R语言 | 如何绘制带组内差异比较的柱形图

参考链接：R语言 | 如何绘制带组内差异比较的柱形图
结果如下：

代码如下：

install.packages(ggpubr)//内置的包不需要安装
install.packages(rstatix)//内置的包不需要安装
library(ggpubr)//绘制条形的图包
library(rstatix)//做差异性检验的包
head(ToothGrowth)//查看数据
write.csv(ToothGrowth,"D:/Rstudio/R/ToothGrowth.csv")//把数据写出
ToothGrowth$dose<-as.factor(ToothGrowth$dose)//因为dose下的数据为数值型变量，需要转换为因子向量，如果自己的数据是因子向量，则可以不用改（因子向量）
p_bar <- ggbarplot(ToothGrowth, x = 'dose', y = 'len', fill = 'supp', add = 'mean_sd’,color = ‘gray30', position = position_dodge(0.6), width = 0.6, size = 1, legend = 'top') +scale_fill_manual(values = c('#E7B800', '#00AFBB'))+labs(x='Dose/day', y='Tooth length',fill='Feed type')//做条形图
p_bar
myt_test <- t_test(group_by(ToothGrowth,dose),len~supp)// 获取组内两两比较的 p 值
myt_test <- add_significance(myt_test,'p')   //根据p值添加显著性标记*符号
my_t.test <- add_xy_position(myt_test,x='dose',dodge=0.8)
p_bar + stat_pvalue_manual(my_t.test , label = 'p', tip.length = 0.05//显示为p值
p_bar + stat_pvalue_manual(my_t.test , label = 'p.signif',tip.length = 0.05)//显示*符号
ggboxplot(ToothGrowth,x = 'dose', y = 'len',fill = 'supp',color = 'gray30', width = 0.6 , size = 1, legend = 'top')+scale_fill_manual(values = c('#21f4cf','#E7B800'))+labs(x = 'Dose/day', y = 'Tooth length',fill = 'Feed type')+stat_pvalue_manual(my_t.test , label = 'p.signif',tip.length = 0.02)//显示p值又显示详细的数据分布（箱线图）

运行截图：

scale_fill_manual详细含义等还可以参考作图流程教程

【R语言 | 如何绘制带组内差异比较的柱形图】相关推荐

R语言如何绘制簇状、堆积、填充柱形图（16）
1.什么是簇状.堆积.填充柱形图? 如图所示,它们分别是簇状柱形图.堆积柱形图.填充比例柱形图. 顾名思义,簇状柱形图,每组的数据,每个单独成柱,但是都簇集到一块儿:堆积柱形图,是每组的数据都堆叠在同 ...
R语言系统自带及附属包开元可用数据集汇总
R语言系统自带及附属包开元可用数据集汇总目录 R语言系统自带及附属包开元可用数据集汇总 #R自带数据集 #R的各种包自带数据集 #R自带数据集向量 euro #欧元汇率,长度为11,每个元素都有命 ...
r语言做绘制精美pcoa图_R语言进行PCoA分析
相信大家在做微生物多样性研究时经常听到PCA分析.PCoA分析,NMDS分析,CCA分析,RDA分析. 它们对物种(或基因.功能)的分析具有重要作用,因而频频出现在16S测序及宏基因组测序中. 那么 ...
R语言可视化绘制及PDF使用字体参数列表：查看字体列表、可视化绘制图像中的字体参数列表、字体示例并写入pdf
R语言可视化绘制及PDF使用字体参数列表:查看字体列表.可视化绘制图像中的字体参数列表.字体示例并写入pdf 目录 R语言可视化绘制及PDF使用字体参数列表:查看字体列表.可视化绘制图像中的字体参数列 ...
R语言层次聚类：通过内平方和WSS选择最优的聚类K值、可视化不同K下的BSS和WSS、通过Calinski-Harabasz指数（准则）与聚类簇个数的关系获取最优聚类簇的个数
R语言层次聚类:通过内平方和(Within Sum of Squares,WSS)选择最佳的聚类K值.以内平方和(WSS)和K的关系并通过弯头法ÿ
R语言ggplot2可视化：组合箱图（boxplot）和直方图(histogram)输出组合可视化结果
R语言ggplot2可视化:组合箱图(boxplot)和直方图(histogram)输出组合可视化结果目录
R语言Brown-Forsythe检验验证组间方差是否相等实战：执行Brown-Forsythe检验、如果各组间的方差不相等我们该怎么办（进行方差分析）
R语言Brown-Forsythe检验验证组间方差是否相等实战:执行Brown-Forsythe检验.如果各组间的方差不相等我们该怎么办(进行方差分析) 目录 R语言Brown-Forsythe检验验 ...
R语言Kaplan-Meier绘制生存分析、Log-rank假设检验、Cox回归曲线实战案例：恶性黑色素瘤的术后数据生存分析
R语言Kaplan-Meier绘制生存分析.Log-rank假设检验.Cox回归曲线实战案例:恶性黑色素瘤的术后数据生存分析目录
R语言可视化绘制基本图形
R语言可视化绘制基本图形简单条形图: 堆叠条形图分组条形图: 均值条形图与条形图的微调: spinogram图饼图.直方图.密度图.箱图.小提琴图.线图.散点图: # Listing 6.1 - ...

【R语言 | 如何绘制带组内差异比较的柱形图】

R语言 | 如何绘制带组内差异比较的柱形图

【R语言 | 如何绘制带组内差异比较的柱形图】相关推荐

最新文章

热门文章