你的位置:偷拍自慰 > r级书屋 >
自慰 自拍 ncount_RNA 和nFeature_RNA扶助过滤
发布日期:2025-03-18 05:25    点击次数:109

自慰 自拍 ncount_RNA 和nFeature_RNA扶助过滤

前情纲领

前次给公共粗浅整理了一下细胞飞舞弧线图融会自慰 自拍,内部使用nCount_RNA莽撞nFeature_RNA在R言语内部画图细胞飞舞弧线,找到一个允洽的cutoff值,进行了一个初步的质控。

图片自慰 自拍

扫尾也提到了,很少会有下贱是原始的rawcounts的数据,一般咱们王人是使用cellranger质控后的数据进行分析。不外关于科罚后的数据集咱们不错可视化一下nFeature_RNA和nCount_RNA来扶助进行质控

情欲超市txt电子书

那领先咱们基于Seurat官网的教程来了解回来一下nFeature_RNA和nCount_RNA,况且可视化判断一下阈值,然后了解一下履行分析情况中的诈欺。

nFeature_RNA和nCount_RNA简介

创建完seurat对象之后,在不进行任何操作时,seurat会为每个细胞创建一个元数据,保存在meta.data内部

#读取数据创建seurat对象pbmc.data <- Read10X(data.dir = "./filtered_gene_bc_matrices/hg19/")pbmc <- CreateSeuratObject(counts = pbmc.data,                            project = "pbmc3k",                            min.cells = 3)                           > dim(pbmc)[1] 13714  2700

图片

每一列的内容:

orig.ident:时常包含所知的样品名,默许为咱们赋给project的值,淌若不赋值那等于SeuratProjectnCount_RNA:每个细胞的UMI数量nFeature_RNA:每个细胞所检测到的基因数量

不错看到nCount_RNA和nFeature_RNA一经有各异的,这就与它们的计较设施联系

图片

#nCount_RNA:总的UMI数即转录本数量colSums(sce@assays$RNA$counts)#nFeature_RNA:总的基因数量colSums(sce@assays$RNA$counts>0)
可视化及阈值判断

不错使用小提琴图来粗浅可视化一下nFeature_RNA和nCount_RNA

VlnPlot(pbmc, features = c("nFeature_RNA", "nCount_RNA"))

图片

过滤前

nFeature_RNA图:反馈的是样品中每个细胞抒发的基因数量,抒发过高可能是双细胞莽撞多细胞,抒发过低可能是空液滴莽撞包裹的是环境RNA

nCount_RNA图:反馈的是每个细胞中包含的UMI数量也等于转录本的数量

在10X Genomics测序数据分析过程中,通过UMI对测序得到的reads进行简并之后,就不错看到一个细胞中被读到些许个基因。一般一个细胞不错得到40000-80000个有用的UMI,平均一个细胞的一个基因有10个支配的UMI。

是以咱们在进行阈值判断的时间,不错平直基于nFeature_RNA值也等于基因的数量

图片

阈值判断

We filter cells that have unique feature counts over 2自慰 自拍,500 or less than 200

官网给的是大于200和小于2500,但可视化之后咱们不错看到上规则在2000其实也不错。

不外pbmc是相比早期的数据了,测到的细胞数量相比少,上限诞生的也相比低,淌若是当今的单细胞数据一经要具体数据具体分析

#基于阈值过滤况且可视化pbmc <- subset(pbmc, subset = nFeature_RNA > 200 & nFeature_RNA < 2000)VlnPlot(pbmc, features = c("nFeature_RNA", "nCount_RNA"))> dim(pbmc)[1] 13714  2692

图片

过滤后

过滤后,细胞从最启动的2700变为当今的2692,过滤掉了部分细胞。

以上是seurat官网pbmc3k_tutorial中QC的部安分容,接下来咱们望望在履行数据中的诈欺。

履行分析中诈欺

淌若公共手里有技能树单细胞分析的尺度分析代码,淌若需要的话不错获得一下长入: https://pan.baidu.com/s/1bIBG9RciAzDhkTKKA7hEfQ?pwd=y4eh

那在咱们的scRNA_scripts文献夹中有个qc.R的质控剧本文献,等于对读取进来的数据进行质控的。

图片

剧本函数领先是计较了线粒体、核糖体以及血红细胞的比例(下期给公共详备先容),然后就可视化了细胞中这些参数的情况。咱们一经先重心望望nFeature_RNA和nCount_RNA

#qc.R剧本中nFeature_RNA和nCount_RNA部安分容feats <- c("nFeature_RNA", "nCount_RNA")p1=VlnPlot(input_sce, group.by = "orig.ident", features = feats, pt.size = 0, ncol = 2) +     NoLegend()p1 w=length(unique(input_sce$orig.ident))/3+5;wggsave(filename="Vlnplot1.pdf",plot=p1,width = w,height = 5)

图片

质控前

一般走尺度经由的时间,在创建seurat对象时间就会基于min.cells = 5和min.features = 300进行过滤,是以在qc剧本中是不进行这一步的过滤操作的。不外为了看一下过滤前后变化,咱们不错基于可视化的遵循进行一个粗浅的过滤操作。

图片

#粗浅过滤 if(T){    selected_c <- WhichCells(input_sce, expression = nFeature_RNA > 500 & nFeature_RNA < 2500)    selected_f <- rownames(input_sce)[Matrix::rowSums(input_sce@assays$RNA$counts > 0 ) > 3]    input_sce.filt <- subset(input_sce, features = selected_f, cells = selected_c)    dim(input_sce)     dim(input_sce.filt)   }    #可视化过滤后的情况  feats <- c("nFeature_RNA", "nCount_RNA")  p1_filtered=VlnPlot(input_sce.filt, group.by = "orig.ident", features = feats, pt.size = 0, ncol = 2) +     NoLegend()  w=length(unique(input_sce.filt$orig.ident))/3+5;w   ggsave(filename="Vlnplot1_filtered.pdf",plot=p1_filtered,width = w,height = 5)  

图片

过滤后

基履行控意旨:不错去颤抖每个样品中,一些抒发量过高莽撞过低的基因。

除了在基履行控设施咱们会可视化一下细胞中nFeature_RNA和nCount_RNA的情况,在进行降维聚类分群的时间,咱们也会对nFeature_RNA和nCount_RNA进行可视化。

细胞降维聚类分群中诈欺

在聘用对应的阈值进行可视化的时间,咱们会用到check-all-markers.R剧本,基于常见Marker基因进行一下可视化,以及画图umap图

图片

在check-all-markers.R剧本,匡助咱们检讨阐述每个细胞亚群中基因的抒发情况,从而匡助咱们判断是否是双细胞。

具体推文:怎样排斥双细胞

咱们在进行亚群粗浅定名的时间,一般聘用相比低的永别率0.1,那在GSE208706数据的0.1分群中,咱们不错很彰着的看到第9群相比狭长,且包含了两个不同细胞亚群的Marker基因。

图片

为了判断是否是双细胞,咱们就需要连络每个亚群的单个细胞的总的RNA数量进行判断

if("percent_mito" %in% colnames(sce.all.int@meta.data ) ){  #可视化细胞的上述比例情况  feats <- c("nFeature_RNA", "nCount_RNA", "percent_mito", "percent_ribo", "percent_hb")    feats <- c("nFeature_RNA", "nCount_RNA")  p1=VlnPlot(sce.all.int , features = feats, pt.size = 0, ncol = 2) +     NoLegend()  w=length(unique(sce.all.int$orig.ident))/3+5;w  ggsave(filename=paste0(pro,"Vlnplot1.pdf"),plot=p1,width = w,height = 5)    feats <- c("percent_mito", "percent_ribo", "percent_hb")  p2=VlnPlot(sce.all.int,  features = feats, pt.size = 0, ncol = 3, same.y.lims=T) +     scale_y_continuous(breaks=seq(0, 100, 5)) +    NoLegend()  w=length(unique(sce.all.int$orig.ident))/2+5;w  ggsave(filename=paste0(pro,"Vlnplot2.pdf"),plot=p2,width = w,height = 5)  }

图片

nFeature_RNA可视化遵循发现反而第8群抒发量高,而第9群平方。基于Marker基因忖度第8群是处于增殖期的细胞,是以抒发量高是合理的。

况且擢升永别率之后,发现9群被细分为两个亚群,也不是双细胞。

图片

一般咱们会把柄中位线以及最高值来进行判断,再擢升永别率看亚群有莫得分开,再详情是否是双细胞。

线粒体比例

在官网以及咱们的尺度质控经由中,王人管帐算线粒体比例

图片

咱们的qc.R剧本中还对核糖体以及血红细胞的比例进行了计较和可视化,那下期全部来了解一下这些内容吧!

图片

本站仅提供存储就业,所有内容均由用户发布,如发现存害或侵权内容,请点击举报。