Displaying 1 result from an estimated 1 matches for "e94a26".
Did you mean:
094426
2024 Dec 10
1
Heat maps containing two types of variables
..."))
heatmap <- ggplot(dat_long, aes(x = date, y = variable,fill=norm_value))
+
geom_tile() +
geom_text(aes(label = as.character(value)),
color = "black", size = 2.5) +
labs(title="REPREX",x="",y="")+
scale_fill_gradient2(low = "#E94A26", mid = "white", high = "#A1D385",
midpoint = 0.5) +
scale_x_continuous(breaks=seq.Date(as.Date("2024-01-01"),
as.Date("2024-06-01"),by="month"),
labels=function(x) format(x,"%b\n%Y"),position="top")+
theme(...