愿武艺晴小朋友一定得每天都开心
对于Degs的可视化展示有很多种方法,遇到多个组别时,特别是scRNA中细胞类型间Degs想一起观察时,jjVolcano就特别的适用,下面我们一起来看具体的做法把:
分为2步;
1)Excel 中准备如下图所示的data:
2)使用R语言以图的形式展示:
library(scRNAtoolVis)
library(readxl)
disease_like_Degs <- read_excel("disease-like Degs.xlsx",sheet = "jjVolcano2_66d")
data <- disease_like_Degs
head(data)
#data <- data[!data$gene== "Hbb-bs",]
data$cluster <- factor(data$cluster,levels = c("HSPCs","CLP","Pro-B","Pre-B","Immature-B","Mature-B")) #,"Pro-T","GMP","Neutrophil","Monocyte","Erythroblast")
mygene <- unique(c("Pou5f1","Pou2af1","Prdm1",