Мой Heatmap не работает должным образом

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

я впервые использовал функцию расплава, используемого в качестве даты ID.

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

С его большой DataFrame, я хотел проверить его только с интервалом H01.01.

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

, а затем приступил к функции ggplot использованием geom_tile

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") 

белое на белом не кажется, как хороший идея.

Это, кажется, работает хорошо. Ваш полный набор данных был слишком велик для тестирования моего дрянного ноутбука.

Надеется, что это полезно.