R中的加热表

Question

我正在寻找一种方法来复制下面显示的热表类型R（可能还有ggplot2）。具体时间轴无关紧要;任何矩形表都应该这样做。

我试图在Google中搜索Heat map和Heat table，但找不到任何可以解决问题的R套餐。

思想？

Answer 1

require(ggplot2)
df <- data.frame(vaxis = rep(c(letters[1:5], "top"), each = 4),
                 haxis = rep(c(letters[6:8], "right"), times = 6),
                 value = rpois(24, lambda = 10))
df$color <- factor(ifelse(df$vaxis == "top" | df$haxis == "right", 1, 0))
ggplot(df, aes(x = haxis, y = vaxis, size = value, color = color)) + geom_point()

只需以类似的格式获取数据。您可以编写一个函数来使“顶部”和“右侧”值标准化边际总和。当然，在命名，传说，主题等方面可以进行大量调整。