3. TARGET_RNAseq_pipline1

加载R包

proj = "TARGET"
library(stringr)
library(rio)
library(tinyarray)
library(DESeq2)
library(dplyr)
library(edgeR)
library(limma)
library(ggplot2)
library(patchwork)

创建示例矩阵及临床信息

##示例矩阵
random_matrix = matrix(round(runif(600)*999+1), nrow=100, ncol=6)
id1 = paste0("CCCCC",c("A","B","C"))
id2 = paste0("TTTTT",c("A","B","C"))
colnames(random_matrix)= c(paste0("TARGET.00.",id1,".14A.01R"),paste0("TARGET.00.",id2,".09A.01R"))
rownames(random_matrix) = paste0("gene",1:100)
random_matrix[, 4:6] = random_matrix[, 4:6] + 1000
head(random_matrix)
#>     
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值