kegg.native=T,#TRUE输出完整pathway的png文件,F输出基因列表的pdf文件new.signature=F,#pdf是否显示pathway标注 limit=list(gene=2.5,cpd=1)#图例color bar范围调整)pathview(gene.data=genelist_entrez,pathway.id=select_pathway,species='mmu',# 人类hsa 小鼠mmu kegg.native=F,#TRUE输出完整pathway的png文件,...
kegg_enrich_results<-enrichKEGG(gene=gene_up_entrez,organism="mmu",#物种人类 hsa 小鼠mmu pvalueCutoff=0.05,qvalueCutoff=0.2)kk_read<-DOSE::setReadable(kegg_enrich_results,OrgDb="org.Mm.eg.db",keyType='ENTREZID')#ENTREZID to gene Symbol write.csv(kk_read@result,'KEGG_gene_up_enrichresul...
kegg_enrich_results <- enrichKEGG(gene = gene_up_entrez, organism = "mmu", #物种人类 hsa 小鼠mmu pvalueCutoff = 0.05, qvalueCutoff = 0.2) kk_read <- DOSE::setReadable(kegg_enrich_results, OrgDb="org.Mm.eg.db", keyType='ENTREZID')#ENTREZID to gene Symbol write.csv(kk_read@result...
enrichKEGG()要设置organism = "mmu",由于其没有readable参数,因此之后还要用DOSE包的setReadable进行转化entrez ID为gene Symbol ### KEGG、GO富集 ###kegg_enrich_results <- enrichKEGG(gene = gene_up_entrez,organism = "mmu", #物种人类 hsa 小鼠mmupvalueCutoff =0.05,qvalueCutoff =0.2)kegg_enrich_r...