10X单细胞通讯分析之scMLnet(配受体与TF,差异基因(靶基因)网络通讯分析)

hi 各位,今天周五了,要开会的关系,没有那么多时间准备分享文献了,但是我很想和大家分享这个方法,类似于多组学分析,配受体与TF分析联合起来的网络分析结果,非常有价值(配体,受体,靶基因,TF多层网络结构,非常赞),我们今天就不分享文献了,多关注一下代码,文章在Inferring microenvironmental regulation of gene expression from single-cell RNA sequencing data using scMLnet with an application to COVID-19, 2020年底发表于Briefings in Bioinformatics,影响因子9分。

Introduction

scMLnet是一个R软件包,用于根据单细胞RNA-seq表达数据构建细胞间/细胞内多层信号交换网络。 scMLnet通过基于细胞类型特异性基因表达,先验网络信息和统计推断,整合细胞间途径(配体-受体相互作用)和细胞内子网络(受体-TF途径以及TF-靶基因相互作用),构建多层网络。 scMLnet还可以可视化中央细胞和邻近细胞之间构建的细胞间/细胞内信号通路。

The main steps of the scMLnet algorithm include:

(1) Step1 Constructing Ligand-Receptor subnetwork:

通过获取高度表达的基因(HEG),从scRNA-Seq数据和配体受体数据库定义潜在的配体受体子网。 类型A(发送者细胞)中的HEG被视为潜在的配体,类型B(受体细胞)中的HEG被视为潜在的受体。

(2) Step2 Constructing TF-Target gene subnetwork

通过获取HEG和Fisher的精确检验(这个可以参考文章Fisher 精确检验与卡方检验(10X单细胞和10X空间转录组的基础知识)),从scRNA-Seq数据和TF-Target基因数据库中定义了有效的TF-Target基因子网络。 B型HEG被认为是潜在的靶基因。 可以从TF-Target基因子网络中推断出激活的TF。

(3) Step3 Constructing Receptor-TF subnetwork

通过Fisher的精确测试从激活的TF和Receptor-TF数据库中定义了有效的Receptor-TF子网。 激活的受体可以从TF-Target基因子网络中推断出来。

(4)Step4 constructing multi-layer signaling network

通过在受体与TF,TF和靶基因之间进行相关分析,然后根据共同的受体和TF重叠配体-受体,TF-靶基因,受体-TF子网来定义多层信号网络。 (相当赞)。

图片.png

输入和输出

For this tutorial, we will be using scMLnet to construct the multi-layer signaling network between B cells and Secretory cells from scRNA-Seq data of BALF in COVID-19 patients. The expression matrix and annotation of clstuers can be found in the /example folder (or be downloaded from Zenodo) and the prior information about interactions in the /database folder.

library(Seurat)
library(Matrix)
library(parallel)
library(scMLnet)

加载包,Seurat包用于normalizing the raw scRNA-Seq data,the Matrix package is used for transformation between matrix and sparse matrix and the parallel package is used for parallel computation of t.test for screening后面两步好像Seurat本身就可以完成,Seurat依赖于后两个包,所以有这个功能)。
输入的是We then read a raw scRNA-Seq data with rows as genes (gene symbols) and columns as cells and the gene expression matrix is required as a sparse matrix(原始矩阵)。

 # import sample data
    GCMat <- readRDS("./example/data.Rdata")
    GCMat<- as(GCMat,"dgCMatrix")
    
    # import sample annotation
    BarCluFile <- "./example/barcodetype.txt"
    BarCluTable <- read.table(BarCluFile,sep = "\t",header = TRUE,stringsAsFactors = FALSE)

我们这里以配体为B细胞,受体为Secretory为例

types <- unique(BarCluTable$Cluster)
LigClu <- "B cells"       #types[4]
RecClu <- "Secretory"     #types[8]

参数设置

默认参数设置如下。 用户可以提供自己的数据库,其中必须包括三个列:分子A,分子B和密钥(用下划线将A与B连接起来)。 分子A和B需要具有清晰的身份(即配体,受体,TF和靶标基因),并且它们之间应存在相互作用 (这里我们用本身数据库的就好)。
根据sender细胞和receiver细胞之间基因表达百分比的差异(受pct参数影响)和比率(受logfc参数影响),我们首先在两种细胞中分别定义特定的高表达基因。(这里差异基因的选择我们需要注意)。
sender细胞中高表达的基因被认为是潜在的配体,而receiver细胞中高表达的基因被认为是潜在的受体和靶基因。 我们通过在数据库中搜索配体-受体对来筛选潜在的配体-受体相互作用。 然后,我们通过Fisher精确检验(受pval参数限制)筛选潜在的受体-TF,TF-Target基因相互作用。(构建这个网络信息,很重要)。

 pval <- 0.05
 logfc <- 0.15
 LigRecLib <- "./database/LigRec.txt"
 TFTarLib <- "./database/TFTargetGene.txt"
 RecTFLib <- "./database/RecTF.txt"

Construction of Multi-layer Signaling Networks

获得高表达基因的运行时间取决于两种类型细胞中基因表达的t检验。 并行执行t检验可以提高scMLnet的性能(前提:已安装并行软件包)。

netList <- RunMLnet(GCMat, BarCluFile, RecClu, LigClu, 
                        pval, logfc, 
                        LigRecLib, TFTarLib, RecTFLib)
###这个函数没有其他的参数

Save and Visualization of Multi-layer Signaling Networks

输出netList是由连接每个上游层和下游层(即Ligand_Receptor,Receptor_TF和TF_Gene子网络)的基因对组成的列表。 信令子网作为数据帧对象返回,其结构与示例数据库相同。

workdir <- "sample"
DrawMLnet(netList,LigClu,RecClu,workdir,PyHome,plotMLnet = T)
图片.png

Construction of Multi-cellular Multi-layer Signaling Networks

import data

GCMat <- readRDS("./example/data.Rdata")
GCMat<- as(GCMat,"dgCMatrix")

# import annotation
BarCluFile <- "./example/barcodetype.txt"
BarCluTable <- read.table(BarCluFile,sep = "\t",header = TRUE,stringsAsFactors = FALSE)

## get LigClu
LigClus <- unique(BarCluTable$Cluster)
LigClus <- LigClus[-grep("Secretory|Doublets",LigClus)]

## creat MLnet
netList <- list()
for(ligclu in LigClus){
  
  #sender cell and receiver cell
  LigClu <- ligclu
  RecClu <- "Secretory"
  
  name <- paste(strsplit(LigClu,split = "\\W")[[1]][1],RecClu,sep = "_")
  
  #main
  netList[[name]] <- RunMLnet(GCMat,BarCluFile,RecClu,LigClu)
  
}

## save output and plot MLnet
workdir <- "multi-cellular"
for (name in names(netList)) {
  
  #scMLnet output
  MLnetList <- netList[[name]]
  print(paste0(name,":"))
  
  #sender cell and receiver cell
  LigClu <- strsplit(name,"_")[[1]][1]
  RecClu <- strsplit(name,"_")[[1]][2]
  
  #main
  PyHome <- "D:/Miniconda3/envs/R36/python.exe" #for Window
  DrawMLnet(MLnetList,LigClu,RecClu,workdir,PyHome,plotMLnet = T)
  
}
图片.png

分析方法相当不错

生活很好,有你更好

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