rm(list = ls())
library(ggplot2)
library(readxl)
pathway = read_xlsx("/Users/wangchen/Desktop/Statistics/GCMS/5代谢通路分析/pathway.xlsx")
pp=ggplot(pathway,aes(Impact,PathwayTerm))
#正式画图并添加size和color的参数
pbubble=pp+geom_point(aes(size=Number,color=P_value))
#添加颜色的变化
pbubble+scale_colour_gradient(low="green",high="red")
代谢组学通路富集分析
最新推荐文章于 2024-05-08 01:13:08 发布