加载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)
#>


4327

被折叠的 条评论
为什么被折叠?



