news 2026/3/10 20:53:02

美图秀秀:出版级火山图

作者头像

张小明

前端开发工程师

1.2k 24
文章封面图
美图秀秀:出版级火山图

有学员评价 Galaxy 平台出的火山图有点丑:

这图确实难言美观。平台其实有好几个火山图工具

  • • 有基于 EnhancedVolcano 包的

  • • 有基于 ggplot2 的

上图就是 EnhancedVolcano 包的效果。不过画成这样,也有别的关系:

  • • 比如基因太多。应该把没表达,或者低表达的基因先过滤一下

  • • 此外 p 值设定,以及坐标轴的范围控制也有问题。

总之,这效果离发表级确实有点远。

既然现有工具的绘制效果差强人意,而火山图本质是一个散点图,为了使用方便,我们干脆再封装一个更适合用于发表的:

  • Volcano Plotwith Publication-Quality (Galaxy Version 1.0)

效果如下:

测试数据

我们先来生成一份测试数据,下面代码来源于 EnhancedVolcano 包的文档:

library(airway) library(magrittr) library(EnhancedVolcano) data('airway') airway$dex %<>% relevel('untrt') colData(airway) # 转换基因符号 ens <- rownames(airway) library(org.Hs.eg.db) symbols <- mapIds(org.Hs.eg.db, keys = ens, column = c('SYMBOL'), keytype = 'ENSEMBL') symbols <- symbols[!is.na(symbols)] symbols <- symbols[match(rownames(airway), names(symbols))] rownames(airway) <- symbols keep <- !is.na(rownames(airway)) airway <- airway[keep,] assays(airway)[[1]] # DESeq2差异分析 library('DESeq2') dds <- DESeqDataSet(airway, design = ~ cell + dex) dds <- DESeq(dds, betaPrior=FALSE) res <- results(dds, contrast = c('dex','trt','untrt')) res <- lfcShrink(dds, contrast = c('dex','trt','untrt'), res=res, type = 'normal') res EnhancedVolcano(res, lab = rownames(res), x = 'log2FoldChange', y = 'pvalue', title = 'N061011 versus N61311', pCutoff = 10e-32, FCcutoff = 0.5, pointSize = 3.0, labSize = 6.0) res$GeneID = rownames(res) out = res[, c('GeneID', 'log2FoldChange', 'pvalue')] write.table(out, 'airway_deg.tsv', sep='\t', row.names = F, quote=F)

EnhancedVolcano 绘制效果,我们后续作图跟该图进行比较:

完成差异分析后,我们将这 3 列(GeneID, log2FoldChange, pvalue)保存到一个文件 airway_deg.tsv 中,然后上传到平台。

开始作图

工具:Volcano Plotwith Publication-Quality (Galaxy Version 1.0)

参数设置:

  • 差异表达分析结果表:airway_deg.tsv

  • 阈值与坐标

    • 显著性阈值 (padj / FDR / qvalue):10e-32

    • 差异倍数阈值 (log2FoldChange threshold):0.5

    • Y 轴显示范围:150.0

  • • 高级设置

    • Y 轴标签:-log10 p-value

结果如下:

这个图就清爽多了。

标记基因

很多时候我们希望标记一些感兴趣的基因,可以将这些基因通过一个文件传给工具。

我们先用 filter 工具筛选一下显著差异基因,参数设置如下:

  • • 注:这个阈值设定供用于测试,实际一般不这样设置。

可以看到有 123 个显著差异基因,都画在图上有点多,我们取 top 20 吧,这里用于 **Select first **工具:

结果:

我们接着再 Cut 一下,将基因一列切出来:

重命名一下,结果:

现在重新作图,除了修改参数:

其他参数跟前面设置完全一样。

标记感兴趣的基因后的效果:

还可以吧。

写在最后

此文并非说 EnhancedVolcano 或者 ggplot2 包的效果不行。它们都非常优秀,并且广受好评。只不过对于作图,每个人的审美偏好不同。作为平台,只有丰富工具的品种,以满足丰富多样的个性化需求。

推荐阅读

中国银河生信云平台(UseGalaxy.cn)致力于零代码生信分析。平台拥有海量计算资源、3000 多个生信工具和数十条生信流程,并且为用户提供 200G 免费存储空间。进群交流请先加 usegalaxy 为好友。我们还为进阶用户提供高质量培训课程:

RNA-seq数据分析实战 | 2026年第1期,开启你的生信学习之旅

版权声明: 本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若内容造成侵权/违法违规/事实不符,请联系邮箱:809451989@qq.com进行投诉反馈,一经查实,立即删除!
网站建设 2026/3/9 2:12:53

跨语言语音合成不再是难题——GPT-SoVITS全面评测

跨语言语音合成不再是难题——GPT-SoVITS全面评测 在短视频创作中&#xff0c;你是否曾为无法用母语之外的语言“亲口”讲述内容而烦恼&#xff1f;在无障碍服务场景里&#xff0c;视障用户是否只能接受千篇一律的机械音朗读外文网页&#xff1f;传统文本到语音&#xff08;TTS…

作者头像 李华
网站建设 2026/3/4 1:00:38

React Flow动态高度节点终极方案:从布局错乱到完美适配的完整指南

在React Flow流程图开发中&#xff0c;动态高度节点堪称"布局挑战者"——文本换行、图片加载、表单输入&#xff0c;任何内容变化都可能让精心设计的界面瞬间崩塌。本文将为你揭示三种层次化的解决方案&#xff0c;从基础配置到高级自动化&#xff0c;彻底告别节点重…

作者头像 李华
网站建设 2026/3/3 22:54:43

City Picker:重新定义地址选择的优雅解决方案

City Picker&#xff1a;重新定义地址选择的优雅解决方案 【免费下载链接】city-picker 下拉面板式省市区三级联动jquery插件&#xff0c;视觉更清爽&#xff0c;交互体验更友好。 项目地址: https://gitcode.com/gh_mirrors/ci/city-picker 在Web开发中&#xff0c;地址…

作者头像 李华
网站建设 2026/3/10 15:59:27

GPT-SoVITS模型训练日志解读指南

GPT-SoVITS模型训练日志解读指南 在语音合成技术飞速演进的今天&#xff0c;一个令人兴奋的趋势正在发生&#xff1a;我们不再需要数小时的专业录音来克隆一个人的声音。只需一分钟清晰语音&#xff0c;就能让机器“学会”你的音色——这正是 GPT-SoVITS 所实现的技术突破。 这…

作者头像 李华
网站建设 2026/3/9 4:23:50

如何在PC上完美运行3DS游戏:Citra模拟器全面指南

如何在PC上完美运行3DS游戏&#xff1a;Citra模拟器全面指南 【免费下载链接】citra A Nintendo 3DS Emulator 项目地址: https://gitcode.com/gh_mirrors/cit/citra 想要在电脑上体验任天堂3DS的经典游戏吗&#xff1f;Citra模拟器为您打开了一扇通往3DS游戏世界的大门…

作者头像 李华