首页 / 文章汇 / 语言学习 / R语言

掌握数据可视化利器:箱线图绘制方法详解

  • 看不见的线
  • 115
  • 2024-04-01 09:56:11
  • 原创

在数据分析和可视化中,箱线图是一种常用且强大的工具,用于呈现数据的分布情况、离散程度和异常值。它能够直观地展示数据的中位数、四分位数、最大值、最小值以及异常值的存在,为我们提供了全面而直观的数据描述。

箱线图的绘制原理

箱线图主要由五个要素组成:上边缘(最大值)、上四分位数、中位数、下四分位数和下边缘(最小值)。其中,箱体代表了数据的四分位数范围,而箱体外的线段则表示了数据的边缘范围。通过观察箱线图,我们可以直观地了解数据的分布情况和异常值的存在。

步骤1:安装和加载ggplot2包

首先,在R环境中确保已经安装了ggplot2包。如果没有安装,可以使用以下命令进行安装:

install.packages("ggplot2")

然后,加载ggplot2包以便可以使用其中的函数和功能:

library(ggplot2)

步骤2:准备数据

接下来,准备你想要绘制箱线图的数据。

读取数据并查看:

dat <- read.csv("data1.csv",header = T)

head(dat)

步骤3:创建箱线图

使用ggplot()函数创建一个基础的绘图对象,并指定数据来源和变量映射:

# dat是读取的数据框,x和y是要在箱线图中显示的变量

ggplot(dat, aes(x=Group, y=Value)) + geom_boxplot()

步骤4:箱线图美化

#添加误差棒

ggplot(dat, aes(x = Group, y = Value)) + geom_boxplot() +

stat_boxplot(geom="errorbar", width=0.5)

#修改主题

ggplot(dat, aes(x=Group, y=Value)) +

geom_boxplot() +

stat_boxplot(geom="errorbar",

width=0.5)+

theme_classic()

#绘制有缺口的箱线图

ggplot(dat, aes(x = Group, y=Value)) + geom_boxplot(notch=T)

#修改离群值的颜色形状和大小

ggplot(dat, aes(x=Group, y=Value)) +

geom_boxplot(outlier.colour = "blue", #设置离群值颜色

outlier.shape = 20, #设置离群值形状,可选:1~25

outlier.size = 5) #设置离群值大小

#添加抖动点

ggplot(dat, aes(x = Group, y = Value)) +

geom_boxplot(outlier.colour = "blue", outlier.size = 1.5) +

geom_jitter(size = 1.5, #抖动点大小

color = "red")

#创建颜色映射

#以Group列填充配色

ggplot(dat, aes(x=Group, y=Value,fill=Group)) +

geom_boxplot() +

theme_classic()

#以Type列填充配色

ggplot(dat, aes(x=Group, y=Value,fill=Type)) +

geom_boxplot() +

theme_classic()

#添加差异检验结果(以t检验为例)

#加载r包

library(rstatix)

library(ggpubr)

#进行t检验

t.test <- t_test(dat,Value~Group)

t.test

#为检验结果添加坐标信息

site <- add_xy_position(t.test,x="Group")

site

#将统计标记添加到箱线图中

ggplot(dat, aes(x = Group, y = Value)) +

geom_boxplot(aes(fill = Group), outlier.colour = "red", outlier.size = 1) +

stat_boxplot(geom="errorbar", width=0.3)+

stat_pvalue_manual(site) +

theme_classic()

#显示p值

ggplot(dat, aes(x = Group, y = Value)) +

geom_boxplot(aes(fill = Group), outlier.colour = "red", outlier.size = 1) +

stat_boxplot(geom="errorbar", width=0.3)+

stat_pvalue_manual(site,label = "p.adj") +

theme_classic()

推荐课程

【课程】微生物比较基因组精品系列课——全套自学必入的系统课程

课程链接:微生物比较基因组精品系列课【全套】

【课程】铜绿假单胞菌基因组研究和分子分型实战

课程链接:铜绿假单胞菌基因组研究和分子分型实战

【课程】微生物比较基因组与群体进化——基因组变异专题研究

课程链接:微生物比较基因组与群体进化

【课程】微生物分子分型-MLST课程——分型全套(含理论、软件、方法)

课程链接:微生物分子分型-MLST课程

【课程】基因组结构分析神器Easyfig实操精品课

课程链接:基因组结构分析神器Easyfig实操精品课

【课程】BRIG绘图——结构比较专题2

课程链接:走进比较基因组,BRIG软件带你轻松玩绘图

【课程】肺炎克雷伯菌基因组学研究综合指南

课程链接:肺炎克雷伯菌基因组学研究综合指南

【课程】微生物基因组生信必学课程

课程链接:微生物基因组生信分析必学课程

【课程】微生物生防菌研究

课程链接:生防菌的系统化研究

专题材料

【资料】耐药专题材料

【资料】生防专题材料

请添加唯那生物技术客服小唯的微信号winnerbio01,备注“耐药专题”或“生防专题”,立马获取。

更多专题推荐

1、生信技能课专辑

2、耐药毒力专题

3、肺炎克雷伯菌专题

4、密码子偏好性专题

5、Easyfig相关问答

6、MLST-cgMLST

7、软件脚本分享

8、微生物基因组研究文章

9、知识干货

10、分泌系统

11、软件下载

12、书籍下载

  • 点赞 (0人)
  • 收藏 (0人)
看不见的线
  • 课程数:
  • 文章数:
  • 学习人数: 0
关注
--- 作者文章 ---
  • 暂无内容
作者课程
  • 暂无内容
相关好课严选

官方微信公众号

客服热线:15618809518

【勤学如春起之苗,不见其增日有所长。假以时日,你定会为你的努力学习而倍感骄傲,加油!】