Input: One date column and a data column
Main package: ggTimeSeries
library(ggTimeSeries)
library(data.table)
library(readr)
library(viridis)
data <- read_csv("data.csv")
p1 <- ggplot_calendar_heatmap(data, 'Date', 'Values')
p1
p2 <- p1 + scale_fill_continuous(type = "gradient") + facet_wrap(~Year, ncol = 1)
p2
p3 <- p1 + scale_fill_continuous(type = "viridis") + facet_wrap(~Year, ncol = 1)
p3
p4 <- p1 + scale_fill_viridis(option="magma") + facet_wrap(~Year, ncol = 1) + xlab(NULL) + ylab(NULL)
p4
p5 <- p1 + scale_fill_viridis(option="inferno") + facet_wrap(~Year, ncol = 1) + xlab(NULL) + ylab(NULL)
p5
p6 <- p1 + scale_fill_viridis(option="cividis") + facet_wrap(~Year, ncol = 1) + xlab(NULL) + ylab(NULL)
p6