(1:50, function(x)paste(sample(LETTERS,3,replace = F),collapse = ""))
df[1:4,1:4]
row_metaData replace = T))
rownames(row_metaData) df)
col_metaData replace = T))
rownames(col_metaData) df)
exprcol <- c("#EE0000FF","#008B45FF...= T),
TAC=sample(c(1,NA),50,replace = T),
gene=rownames(df))
p1...代码实现
ggheatmap2df,cluster_rows = T,cluster_cols = T,scale = "row",