转录组——火山图(vocano plot)

本文介绍如何利用Python进行转录组数据分析,并通过matplotlib库创建火山图,展示差异表达基因的显著性。内容涉及数据预处理、统计测试以及可视化技巧,帮助理解基因表达的变化情况。
摘要由CSDN通过智能技术生成
##############################
# 2020/11/12 处理差异分析结果,ggplot绘制火山图
##############################
library(tidyverse)
# 导入差异分析数据
gene_info <- read.csv(file = "zd_gene_info.csv")
names(gene_info) <- c("gene_id","Swissprot_ID","Gene_symbol","Function")
data <- read.csv(file = "../muscle/res",
                 header = T,
                 sep = "\t" )
de_result <- left_join(data, gene_info, by = c("id" = "gene_id"))


names(data) <- c("id","base","log2FoldChange","if","sta","pvalue","padj") # 重命名列名
data_plot <- select(de_result , id , log2FoldChange, pvalue, padj,Swissprot_ID,Gene_symbol,Function) %>% 
  mutate(FC = 2**log2FoldChange,
         direction = if_else( padj > 0.05, 'ns',
                             
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值