R语言怎么画污染等级日历图

Question

如题所述

Answer 1

导入数据：

library(openair)
setwd("文件存储地址如：C:/Program Files/RStudio/R")
Sys.setlocale("LC_TIME","English")
mydata=read.csv("文件名.csv",header=TRUE)
mydata[mydata==-99]<-NA
mydata$date<-as.POSIXct(strptime(mydata$date,format="%Y/%m/%d",tz="GMT"))
head(mydata)
tail(mydata)

做污染日历图

calendarPlot(mydata,pollutant="level",year=2019,month=c(4),breaks=c(-1,0,1,2,3,4,5,6),labels=c("无效","优","良","轻度污染","中度污染","重度污染","严重污染"),cols=c("gray","limegreen","yellow","orange","red","darkmagenta","darkred"),main="某地区某时间空气质量等级月历",w.shift=2)

给你一个例子，我把数据源文件中AQI无效的都改成了-1，做的是4月份的污染日历图，效果如下：

Answer 2

日历是一种日常使用的出版物，用于记载日期等相关信息。每页显示一日信息的叫日历，每页显示一个月信息的叫月历，每页显示全年信息的叫年历。有多种形式，如挂历、座台历、年历卡等，如今又有电子日历。