在使用clusterprofilr进行GO富集分析和绘图时只能画出一个点
我的代码
library("clusterProfiler")

导入基因列表

gene <- read.table("D:/基因注释/sv/1.gene.txt",header = F,sep=",")
gene <- as.factor(gene$V1)

导入注释文件

term2gene <- read.csv("D:/基因注释/sv/1.sv.single.txt",header=T,sep="\t")
term2name <- read.csv("D:/基因注释/sv/go_term.list",header=F,sep="\t")

富集分析

x <- enricher(gene,TERM2GENE=term2gene,TERM2NAME=term2name,pvalueCutoff = 0.01, pAdjustMethod = "BH", qvalueCutoff = 0.05)

设置结果输出文件

ouf <- paste(out_file,sep ="\t")

输出结果

write.csv(x,ouf)

绘制条形图

barplot(x)

绘制气泡图

dotplot(x)
我的输出