, "CRIg", "CR1", "Factor H", "Factor I", "FHL1", "C4BP", "Properdin" ,"C1INH")
以上的基因是文章内给的,但是我在矩阵里面搜了一下..."C4BPA", "CFP", "SERPING1"),
b=rep(1,9))
此处是对细胞名字做准备处理(行名),先建立向量,然后变成数据框
xb <- c("BT474...","BT549",'MDA-MB-231','HCC1937','MDA-MB-361','MDA-MB-436',"AU565","SK-BR-3","MCF-7",'MDA-MB-453')
这里多了一步是因为我发现所有细胞名字之间没有...- 作为分隔号
xbb <- c("BT474","BT549",'MDAMB231','HCC1937','MDAMB361','MDAMB436',"AU565","SKBR3","MCF7",...fontsize_number=50,angle_col = "45",color = color.3,legend = TRUE,title )
由于pheatmap 似乎无法将轻易的将lab