github.com/BioInfoCloud/CellMiner
----
1.数据下载
Download Data Sets 》》》》Processed Data Set:
勾选RNA: RNA-seq和Compound...dat1[1,]
dat1 <- dat1[-1,-c(67,68)]
# 筛选药物标准
table(dat1$`FDA status`)
# 选取经过临床试验（Clinical trial）和FDA...)
tit <- paste0("R:",round(data[dr,1],2),",p value = ",round(data[dr,2],3))
p ggplot...filename = paste0("opFig/",g,"-",dr,"-cor.pdf"),plot = p,width = 5,height = 5)
}
}
})
7.基因高低表达分组小提琴图...###======可视化========
rm(list = ls())
library(ggplot2)
library(ggpubr)
library(ggsignif)
library(RColorBrewer
云服务器
ICP备案
对象存储
腾讯会议
云直播
