高级火山图 突出显示自定义的基因volcanic volcano plot duqiang 差异基因火山图
input:
总的差异基因
想要显示的基因 geom_label_repel
总的有显著性含义的差异基因 自己事先从总的差异基因筛选出来的,显示为红色或者绿色
codes
ggplot(allGenes, aes(log2FoldChange, -log10(pvalue))) +geom_point() +geom_point(data=DEG_sig,aes(log2FoldChange, -log10(pvalue)),color=ifelse(DEG_sig$log2FoldChange>0,"red","green"))+geom_point(size = 5, shape = 1, data = top20)+geom_label_repel(aes(label = genename), data = top20,alpha=1,max.overlaps = getOption("ggrepel.max.overlaps", default = 35))+xlab("Log2FoldChange")+ylab("-Log10(Pvalue)")+theme_bw(base_size = 15)
results
library(dplyr)
library(ggplot2)
library(ggrepel)degs=openxlsx::read.xlsx("G:/r/duqiang_IPF/GSE150910_IPF_Donors_subsets/degs_for_ipf vs control_filtered.xlsx")
head(degs)DEG_sig=degs
head(DEG_sig)allGenes=openxlsx::read.xlsx("G:/r/duqiang_IPF/GSE150910_IPF_Donors_subsets/degs_for_ipf vs control.xlsx")
head(allGenes)
#这一步很重要,选择要标记的数据,
#这里选择的是top 20个基因,按照logFC进行排序
#top20=DEG_sig %>% top_n(20,abs(logFC))gene_interested=readClipboard()
head(gene_interested)
library(stringr)
top20=str_split(pattern = ",",gene_interested)[[1]]
top20top20=allGenes[allGenes$genename %in%top20,]
head(top20)ggplot(allGenes, aes(log2FoldChange, -log10(pvalue))) +geom_point() +geom_point(data=DEG_sig,aes(log2FoldChange, -log10(pvalue)),color=ifelse(DEG_sig$log2FoldChange>0,"red","green"))+geom_point(size = 5, shape = 1, data = top20)+geom_label_repel(aes(label = genename), data = top20,alpha=1)+xlab("Log2FoldChange")+ylab("-Log10(Pvalue)")+theme_bw(base_size = 15)dev.off()
ggplot(allGenes, aes(log2FoldChange, -log10(pvalue))) +geom_point() +geom_point(data=DEG_sig,aes(log2FoldChange, -log10(pvalue)),color=ifelse(DEG_sig$log2FoldChange>0,"red","green"))+geom_point(size = 5, shape = 1, data = top20)+geom_label_repel(aes(label = genename), data = top20,alpha=1,max.overlaps = getOption("ggrepel.max.overlaps", default = 35))+xlab("Log2FoldChange")+ylab("-Log10(Pvalue)")+theme_bw(base_size = 15)
高级火山图 突出显示自定义的基因volcanic volcano plot duqiang 差异基因火山图相关推荐
- ppt扇形图怎么显示数据_前方高能!多维数据分析的神器雷达图PPT制作教程来啦!...
数据的可视化呈现,是最近几年的一个热门词,尤其是在各种PPT的制作中,观看者越来越希望通过简单直接的方式了解到数据背后的深刻含义,因此,之前我们也专门为大家分享了为什么要在PPT里去做数据的可视化呈现 ...
- 差异基因 p log2foldchange_拟南芥的基因ID批量转换?差异基因,GO/KEGG数据库注释(转录组直接送你全套流程)...
新手遇到的问题都是类似的,比如批量ID转换 虽然我写过大量的教程:ID转换大全 不过都需要R基础,因为是大批量转换啊! 但热心肠的植物生物信息学教学大佬还是友善的给出了解决方案 我也狗尾续貂制作了 ...
- python三维图怎么显示_如何在python中绘制多个回归3D图
我不是科学家,所以请假设我不知道有经验的程序员的行话,或者科学绘图技术的复杂性. Python是我所知道的唯一语言(初学者,也许是中级). 任务:将多元回归的结果(z = f(x,y))绘制为3D图形 ...
- geo下载表达矩阵 多因素差异分析 deseq2 duqiang_1分析GEO数据库差异基因(GSE150910)将差异基因与泛素化酶取交集
geo矩阵的获取有两种方式: library(DESeq2) library(DESeq2) getwd() dir.create("G:/r/duqiang_IPF/GSE150910_I ...
- jetson nano 远程登录及关闭图形化显示
在nano上编译工程时总卡,最好用的解决方案就是远程登录并关闭图形化显示. 1.在另一台win上下载远程登录软件PuTTY,下载链接,提取码:ig0e 2.在nano上用ifconfig命令查看IP地 ...
- 送书|高通量数据中批次效应的鉴定和处理(四)- 在差异基因鉴定过程中移除批次效应...
生物信息学习的正确姿势 NGS系列文章包括NGS基础.转录组分析 (Nature重磅综述|关于RNA-seq你想知道的全在这).ChIP-seq分析 (ChIP-seq基本分析流程).单细胞测序分析 ...
- DESeq2差异基因分析和批次效应移除
差异基因鉴定 基因表达标准化 不同样品的测序量会有差异,最简单的标准化方式是计算 counts per million (CPM),即原始reads count除以总reads数乘以1,000,000 ...
- 轻松在线差异基因/物种分析和可视化
7.1 limma用于转录组reads-count数据差异基因分析 做转录组差异分析,我们通常是基于reads-count数据,这个数据可以来源于Salmon的结果.STAR的结果或从网上下载的数据. ...
- mirna富集分析_GEO芯片数据下载,矩阵提取,差异基因分析,差异miRNA分析,miRNA靶基因预测,GO、KEGG功能,蛋白互作网络构建 - 生物信息学讨论版 -丁香园论坛...
一.芯片差异基因分析 1. 芯片数据收集 在 NCBI GEO数据库下载 . 2.做差异分析 使用limma R包计算正常组织和病组织的差异表达情况 3.绘制火山图 4.绘制热图 使用pheatmap ...
- edger多组差异性分析_edgeR之配对检验分析差异基因的使用教程
edgeR的介绍 背景 RNA-seq表达谱与生物复制的差异表达分析. 实现一系列基于负二项分布的统计方法,包括经验贝叶斯估计,精确检验,广义线性模型和准似然检验. 与RNA-seq一样,它可用于产生 ...
最新文章
- 用友二次开发 用友控件 Js宿主脚本 调用用友T6 登录 参照 控件示例
- 巧用ASP.NET预编译Web应用程序规避调用延迟,徐汇区网站设计
- nutch 1.5 solr 4.0 warmup
- 【数据结构笔记】快速排序(quickSort)和快速选择(findKthLargest)--Python3
- 怎么破坏联合索引,使ABC的联合索引,走B的索引
- MCT工具的使用说明
- H3C华三链路聚合的原理及配置
- Gson解析新浪微博数据
- unity避免相机穿墙
- 8、开发工具软件 - 软件技术系列文章
- Windows 下有什么软件能够极大地提高工作效率
- 高德vue-amap使用(一)标记点位获取地址及经纬度
- 移动端购房工具--汇率计算的实现
- swagger在VS2019 .net core2.2中的使用,及报错undefined /swagger/v1/swagger.json的解决办法
- java7java8 集合中对象的某一个字段分组
- 莽撞小子终到迟暮中年 弗朗西斯择队目标转换(转)
- 7-25 盲盒包装流水线(标准解法+简洁AC)
- signature=6217a496579a029c7524d3521cec3dea,网络工程师成长日记370-阿尔斯通
- 印刷电路板(PCB)的制作工艺流程
- 通过对json数据解析爬取虎牙直播数据并存入csv文件