library(RColorBrewer)
library(pheatmap)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "Dark2")))(100)
breaks = seq(min(unlist(c(df))), max(unlist(c(df))), length.out=100)
pheatmap(df, color=colormap, breaks=breaks,border_color="black",
cutree_col = 2,cutree_row = 4)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/f6ef13fc4c616b635877d747852ac9a0.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "Accent")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/b89882740cf468b43f597d5ce6a24870.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "Paired")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/4e3fd43e7f5a2f86a4a40b5393e8fc44.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "Spectral")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/9c1678d7043760b99a3de0b621f97c39.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "RdYlGn")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/c1d330187483dc413891bd0929e5abf6.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "RdYlBu")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/8309811cacba4d7b8d5362fb69d77adb.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "RdGy")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/7e3980ab86f5f23171b3b410d293ebfc.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "RdBu")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/73b61f412ccfc15a5a947a3e2d8693d4.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "PuOr")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/d65eab1af40da3f59acaefa3c93d6079.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "PRGn")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/a8882982d1ff955b8bb99e50848cbc3c.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "PiYG")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/e8b1612020e12fe44fdc5d2b106e14c0.png)
colormap <- colorRampPalette(rev(brewer.pal(n = 7, name = "BrBG")))(100)
![在这里插入图片描述](https://i-blog.csdnimg.cn/blog_migrate/830f13ea2fb3290ec2ae4a9b39922dba.png)