其他分享
首页 > 其他分享> > 【代码更新】单细胞分析实录(21): 非负矩阵分解(NMF)的R代码实现,只需两步,啥图都有

【代码更新】单细胞分析实录(21): 非负矩阵分解(NMF)的R代码实现,只需两步,啥图都有

作者:互联网

1. 起因

之前的代码(单细胞分析实录(17): 非负矩阵分解(NMF)代码演示)没有涉及到python语法,只有4个python命令行,就跟Linux下面的ls grep一样的。然鹅,有几个小伙伴不会命令行,所以我决定再改写一下,把命令行都放到R下面运行。

2. 尝试

2.1 一开始,我的想法是教大家在R里面调用python,需要提前下载好anaconda和一些python包
然而想了想在Windows上安装python包可能对大家不是很友好,有些包很难装,我之前也弄了很久。考虑到这次更新是针对桌面版Rstudio用户,故没有采用。

2.2 最终,我采用的方案是,使用Rstudio Server,也就是网页版Rstudio
这样做有几个好处:

代码方面也更加简化:

如果你之前在我这儿拿过代码,可以直接找我要更新的代码。此外,如果因为之前的代码涉及命令行,你操作起来有困难,可以找我开Rstudio Server的账户 (高端玩家就别了,服务器配置比较低,就够几个人用的那种)。

3. 注意

接下来简单介绍一下,使用方法


登录

打开我给你的链接,输入用户名和密码即可登录

之后就可以看见Rstudio的界面了

然后确保你的家目录下面有图中框出来的几个文件,并点击进入count_data文件夹

上传数据

点击upload上传数据

运行代码

主要是3.R中的step1step2两个函数

library(reticulate)

use_condaenv(condaenv = "cnmf_env", required = T,conda = "/home/hsy/miniconda3/bin/conda")
py_config() #如果显示cnmf_env环境里面的python就OK

source("1.R")
step1(dir_input = "count_data",dir_output = "res1",k=3:5,iteration = 50) #这里为了演示方便,取值都比较小

source("2.R")
step2(dir_input = "res1",dir_output = "res2",dir_count = "count_data",usage_filter = 0.03,top_gene = 30,cor_min = 0,cor_max = 0.6)

查看结果

step2之后,会在res2文件夹中生成结果文件

sampleID_program.usage.norm.txt和sampleID_program.Zscore.txt
是NMF分解表达矩阵得到的两个矩阵

program_topngene.txt
这是所有program的前几十个基因,一般会放到文件附表

program_pearson_cor.complete.heatmap.pdf
program之间的相关性热图
cor_heatmap_data.txt
用来画上图的数据

program_topngene_enrichment.xlsx
program_topngene_enrichment_order.csv
这两个都是对program前几十个基因的富集分析结果,这两个文件可以用来辅助我们理解program,其中第二个文件和相关性热图的顺序一致,看起来更方便

sampleID_program_gene.heatmap.pdf
用来验证在这个样本中,program找得对不对,其实就是看program的表达,一般看program的前几十个基因
sampleID_data_heatmap.txt
用来画上面那个热图的数据

program之间的相关性热图

某个样本中program的表达

下载结果

选中你想导出的文件,点击more,再点击Export就可以了


至此,公众号仅有的两篇付费教程都已更新完毕~

因水平有限,有错误的地方,欢迎批评指正!

标签:Rstudio,21,非负,python,代码,program,txt,dir
来源: https://www.cnblogs.com/TOP-Bio/p/15508163.html