当数据相同时，stats :: heatmap不会绘制任何内容

Question

我在脚本中绘制了很多热图，并且我不时有一个具有相同值的热图。 目前它没有产生任何东西......

heatmap(matrix(rep(1,25),5,5,dimnames=list(letters[1:5],letters[6:10])))
Warning messages:
1: In min(x) : no non-missing arguments to min; returning Inf
2: In max(x) : no non-missing arguments to max; returning -Inf

我原本预计到处都会看到一张红色的地图......是否有解决方法？

---

heatmap(matrix(rep(1,25)+rnorm(25),5,5,dimnames=list(letters[1:5],letters[6:10])))

---

Answer 1

它使用包heatmap.2

中的函数gplots

install.packages("gplots")    
library(gplots)

a <- matrix(rep(1,25),5,5,dimnames=list(letters[1:5],letters[6:10]))
heatmap.2(a)

如果你不喜欢左上角的颜色图例，你可以玩gplots中的许多选项。当然，在这种情况下有一个“平面树状图”。