library(devtools)
install_github("YuLab-SMU/clusterProfiler.dplyr")
library(clusterProfiler.dplyr)
ddd <- filter(kk_all_readable,Count>=4) #根据自己需要对数据过滤
tiff(file="KEGG_dotplot.tiff",width=25,height=30,units="cm",compression="lzw",bg="white",res=600)
dotplot(ddd, x="GeneRatio",color = "pvalue")
dev.off()
链接表
-
近期文章
近期评论
分类目录
分类目录