与所有变量相关的请求热图的可视化

Question

我正在尝试构建一个基于这教程的“热图”。我的data.frame看起来是这样的：

​

​

结果如下：

​

​

代码：

row.names(data) <-data$X)
data<-data[,2:5]
data_matrix<-data.matrix(data)
heat_result<-heatmap(data_matrix, Rowv=NA, Colv=NA, col = heat.colors(256), scale="column", margins=c(5,10))

我的问题是:如果你看一下三月的必应和百度的data.frame (用黄色标记)，热图上的结果是相同的(都是强红色)。我假设热图显示特定的“搜索引擎”在几个月内的颜色，而不是所有其他搜索引擎。那么，我如何设置热图这样的方式，颜色结果将相对于所有其他搜索引擎？我预计三月份会看到红色的冰色。

Answer 1

您可以使用缩放参数更改缩放。将其更改为“无”将防止在绘制颜色之前对列进行重新标度。下面的最后一行代码是您想要的。

https://stat.ethz.ch/R-manual/R-devel/library/stats/html/heatmap.html

set.seed(42)

#uniform sampling, b is much larger than a
a = runif(10,1,10)
b = runif(10,10,100)

data = as.matrix(cbind(a,b))

#scale across columns
heatmap(data, Rowv=NA, Colv=NA, col = heat.colors(256), scale="column", margins=c(5,10))

#color across whole dataset.
heatmap(data, Rowv=NA, Colv=NA, col = heat.colors(256), scale="none", margins=c(5,10))

图片：

以下是scale=“列”：

​

下面是scale=的“无”：

​