R语言绘制日历热力图
数据格式
这里date的格式 需要包含小时等信息,以其他格式会报错。程序会自动汇总或求平均,由statistic指定。
> data
data3.payTime data3.payment
1 2019-01-03 14:19:16 101.26000
2 2019-01-03 14:53:13 48.65000
3 2019-01-03 22:51:02 102.46000
4 2019-01-04 10:47:05 12.47000
5 2019-01-04 13:43:51 2398.69000
6 2019-01-13 08:18:47 511.02000
7 2019-01-13 19:55:20 87.11000
8 2019-01-17 14:31:56 61.91749
9 2019-01-17 15:02:49 56.24000
10 2019-01-18 13:00:23 104.48000
将R语言环境更换为英文模式:
Sys.setlocale(category = "LC_ALL", locale = "C")
运行绘图程序:
library(openair)
colnames(data)<-c('date','no2')
calendarPlot(data,
pollutant = "no2",
breaks = c(0, 100000, 250000, 350000, 450000),
# 为了展示图片效果,分段是随意分的,没有科学依据
labels = c("Very low", "Low", "High", "Very High"),
cols = c("lightblue", "skyblue", "gold2", "brown"),
statistic="sum",
year = 2019)
可得到: