kegg富集分析时,显示结果no gene can be mapped,想问下是交叉基因太少还是什么原因
> rt=read.table("interGene.txt", header=F, sep="\t", check.names=F)
> genes=unique(as.vector(rt[,1]))
> entrezIDs=mget(genes, org.Hs.egSYMBOL2EG, ifnotfound=NA)
> entrezIDs=as.character(entrezIDs)
> rt=data.frame(genes, entrezID=entrezIDs)
> gene=entrezIDs[entrezIDs!="NA"]
> kk <- enrichKEGG(gene=gene, organism="hsa", pvalueCutoff=1, qvalueCutoff=1)
Reading KEGG annotation online: "https://rest.kegg.jp/link/hsa/pathway"...
Reading KEGG annotation online: "https://rest.kegg.jp/list/pathway"...
--> No gene can be mapped....
--> Expected input gene ID:
--> return NULL...
> KEGG=as.data.frame(kk)
> KEGG$geneID=as.character(sapply(KEGG$geneID,function(x)paste(rt$genes[match(strsplit(x,"/")[[1]],as.character(rt$entrezID))],collapse="/")))
> KEGG=KEGG[(KEGG$pvalue$qvalue write.table(KEGG, file="KEGG.txt", sep="\t", quote=F, row.names = F)
> showNum=30
> if(nrow(KEGG)showNum=nrow(KEGG)
+ }
Error in if (nrow(KEGG) < showNum) { : argument is of length zero
“Devil组”引证GPT后的撰写:
在KEGG富集分析时,"No gene can be mapped"的错误通常表示输入的基因无法在KEGG数据库中找到匹配。可能的原因包括:
例如,在检查showNum之前,你可以添加以下代码:
if(nrow(KEGG) == 0) {
stop("No enriched pathways found.")
}
这将在没有找到富集通路时停止代码执行,并输出相应的错误消息。
还是没有解决,最后使用网站进行kegg分析了
楼主解决了么,我的也出了这个问题,之前没问题,突然就不行了,是不是数据库的问题?
我也出现了这个错误,怎么都是error
我昨天晚上也出现了这个问题,怎么弄都不行,人都麻了。按理说我的gene ID相关的都没有问题,因为前几天这样做,就能跑出结果,这两天就是报错………………
目前不知道原因,我今天也出这个问题了,前几天还好好的.....
请问这个问题解决了吗?一直报错
请问解决了吗?我也遇到同样的问题