## 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
test[15:20, seq(2, 10, 2)] = test[15:20, seq(2,
1