## 1.设置当前工作目录 setwd(./pheatmap/) ## 2.导入R包 library(pheatmap) ## 3.更改参数，绘制不一样的热图 ### 3.1 构建测试数据 test = matrix(rnorm(200), 20, 10) test[1:10, seq(1, 10, 2)] = test[1:10, seq(1, 10, 2)] + 3 test[11:20, seq(2, 10, 2)] = test[11:20, seq(2, 10, 2)] + 2