R 语言 日历图

引言

日历图数据结构一般有2个变量：Date和Value，value映射到颜色。

ggTimeSeries绘图

setwd("D:/R/working_documents1")
library(ggplot2)
library(data.table) # 数据格式依赖
library(ggTimeSeries)
library(RColorBrewer)

# 构造随机数据
set.seed(2134)
dat <- data.table(
  date = seq(as.Date("2016-01-01"), as.Date("2019-12-31"), "days"),
  ValueCol = runif(1461)
)

dat[, ValueCol := ValueCol + (strftime(date, "%u") %in% c(6,7)*runif(1)*0.75)
    ][, ValueCol := ValueCol + (abs(as.numeric(strftime(date, "%m")) - 6.5))*runif(1)*0.75
      ][, ':='(Year = as.integer(strftime(date, "%Y")), # add new column
               month = as.integer(strftime(date, "%m")),
               week = as.integer(strftime(date, "%W")))] # 添加列

M