Question

我正在使用heatmap为某些棒球数据绘制每个投球表现类别的领先者。我的问题是我需要扭转其中一个列的“热量”，因为最好的ERA是最低的，而不是最高的。这是代码。 mlb2010是通过SQL从RSQLite数据库导入的数据。

mlb10 <- sapply(2:length(mlb2010), function(i) {
    mlb2010[, i] <- as.numeric(mlb2010[, i]) 
    })

rc <- rainbow(nrow(mlb10), start = 0, end = .3)
cc <- rainbow(ncol(mlb10), start = 0, end = .3)

heatmap(mlb10, col = rev(heat.colors(256)), scale = "column", 
        Rowv = NULL, Colv = NA, RowSideColors = rc, ColSideColors = cc, 
        margins = c(5,10), labRow = c(mlb2010$team), labCol = names(al2010)[-1],
        xlab = "Performance factors", ylab =  "Team",
        main = c("Relating Performance to Payroll", "2010 MLB Season"))

我在revC中尝试了heatmap参数但没有成功。这是我应该使用的吗？或者这会重新排序所有列，而不是列内的内容？我也试过sapply颜色无济于事。

非常感谢任何帮助。

Answer 1

根据OP的要求，发布解决方案的基础知识。

只需执行ml10$ERA <- -ml10$ERA即可撤消订单，然后按照帖子进行绘制。

在热图的一列中反转“加热”（）

1 个答案: