我的热图不能正常工作

Question

我有这个数据框：

包含二进制值。数据框由日期列（格式%Y-%m-%d）和由H01.01，H01.02，...到H24.06指示的时间间隔列组成。我想创建一个heatmap，H0.01上的时间间隔（H01.02 ... x-axis ...）和y-axis上的日期，对于每个1，我想用一种颜色填充它们（在这种情况下，我选择了蓝色）。

The dataframe is available to download using this link: we.tl/F7gJkPhStG

我首先使用融合功能，使用Date作为ID。

dat<- melt(df, id.vars = "Date")

由于它是一个大型数据帧，我只想用H01.01间隔进行测试。

dat.H01.01<- dat[1:146131, 1:3, drop=F]

然后使用geom_tile

继续ggplot函数

ggplot(dat.H01.01, aes(variable, Date)) +
           geom_tile(aes(fill=value),color="white") + 
           scale_fill_gradient(low = "white",high = "blue")

但出于某种原因，颜色不会显示出来：

有人能帮助我吗？

Answer 1

我在你的链接数据上运行你的代码并得到了这个输出：

我确实改变了颜色渐变：

scale_fill_gradient(low = "yellow",high = "blue")

白色白色并不是一个好主意。

似乎工作正常。您的完整数据集太大，无法让我的笔记本电脑进行测试。

希望这有用。