单细胞Marker基因可示化包Nebulosa

与传统的转录组测序相比,单细胞测序技术噪声很大,使得单细胞转录组数据包含大量的dropout事件(导致基因表达量为0或接近0),即使是一些标记(Marker)基因也有可能表达量很低。当在使用其对聚类的细胞类型进行注释的时候,往往会影响可视化效果。

Nebulosa是一个基于加权核密度估计新出的R包,用于可视化单细胞的数据。它的目的是通过纳入细胞之间的相似性,允许细胞特征的 "卷积",来恢复丢失的基因信号。

数据准备 

首先需要安装和加载相应的包:

if (!requireNamespace("BiocManager", quietly = TRUE))

install.packages("BiocManager")

BiocManager::install("Nebulosa")

library("Nebulosa")

library("Seurat")

测试数据选择10x Genomics 免费提供的外周血单核细胞(PBMC)数据集,约有2700个细胞(https://cf.10xgenomics.com/samples/cell/pbmc3k/pbmc3k_filtered_gene_bc_matrices.tar.gz),下载完解压获得单细胞表达矩阵文件夹。接下来就简单的导入数据对其进行质控啦。

data <- Read10X(data.dir = "filtered_gene_bc_matrices/hg19/")

pbmc <- CreateSeuratObject(counts = data,project = "pbmc3k",min.cells = 3,min.features = 200)

pbmc[["percent.mt"]] <- PercentageFeatureSet(pbmc, pattern = "^MT-")

pbmc <- subset(pbmc, subset = nFeature_RNA < 2500 & percent.mt < 5)

接下来可以进行数据的标准化、降维、聚类,最后可以获得UMAP聚类图(Fig 1),结果保存为.rds文件。具体教程详见我们以往的文章《10x单细胞数据分析之Seurat》

pbmc <- SCTransform(pbmc, verbose = FALSE)

pbmc <- RunPCA(pbmc)pbmc <- RunUMAP(pbmc, dims = 1:30)

pbmc <- FindNeighbors(pbmc, dims = 1:30)

pbmc <- FindClusters(pbmc)

DimPlot(pbmc, label = TRUE, repel = TRUE)

saveRDS(pbmc,"pbmc.rds")

Fig 1:UMAP聚类图

Marker基因可视化 

Nebulosa主函数是plot_density;和Seurat的 FeaturePlot 函数类似。通过下面两条代码,可以简单的对比一下。

plot_density(pbmc, "CD4")

FeaturePlot(pbmc, "CD4")

Fig2:CD4在Nebulosa(左图)和FeaturePlot(右图)的UMAP可视化

可视化结果发现,Nebulosa可视化(左图)会比Seurat自带的绘图函数(右图)效果好很多;同时也表明了CD4+ cell存在相当多的dropout。再加上CD3D可视化结果(Fig3),我们很容易可以判断cluster 0,1为 CD4+ T cell。

Fig 3:CD3D UMAP可视化

数据准备多个Marker基因联合可视化 

知道了cluster 0,1是CD4+ T cell,让我们来鉴定Naive CD4+ T cells吧!更复杂的亚群鉴定需要多个marker一起来判定。只需要一行代码,Nebulosa可以将多个marker鉴定的结果组合起来。

plot_density(pbmc, c("CD4", "CCR7"), joint = TRUE)[[3]]

Fig 4:Naive CD4+ T cells鉴定

我们很容易鉴定Naive CD4+ T cells,值得注意的是这些细胞主要包含于cluster 0(CD4+ T cell)(Fig 4)。

熟悉PBMC的读者应该知道,Naive CD8+ T cells(CD8+CCR7+细胞)通常聚集在CD4+CCR7+旁边,与其他CD8+细胞分开。我们也可以验证这一点,下图鉴定了cluster 9为Naive CD8+ T cell,它聚集在CD4+CCR7+旁边(Fig5)。

plot_density(pbmc, c("CD8A", "CCR7"), joint = TRUE)[[3]]

Fig 5:Naive CD8+ T cells的鉴定

总之,Nebulosa对于检测dropped-out genes信号和改善其在低维空间的可视化是有效的,对于基因表达较好的基因,直接基因表达可视化是更好的选择。我们可以多多尝试Nebulosa和Seurat以及Bioconductor中其他可视化方法一起使用,进而得出更加可靠的分析结论。

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 193,812评论 5 459
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 81,626评论 2 371
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 141,144评论 0 319
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 52,052评论 1 263
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 60,925评论 4 355
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 46,035评论 1 272
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 36,461评论 3 381
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 35,150评论 0 253
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 39,413评论 1 290
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 34,501评论 2 307
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 36,277评论 1 325
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 32,159评论 3 312
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 37,528评论 3 298
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 28,868评论 0 17
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 30,143评论 1 250
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 41,407评论 2 341
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 40,615评论 2 335