在时间序列图中划分对偶y(复数)的R函数是吗？

Question

我试着根据浓度(ppm，温度等)绘制双y的图表。

参考数据在这里。

​

​

使用这些数据，我想在下面绘制图表。

​

​

在像“浓度，摄氏”这样的物理单位的划分方面，我把"Gas.temp“移到右y轴。我使用了图书馆的“ggplot”，“openair”，但是由于缺乏知识，我找不到任何相关的功能。

总之，重点是如何在R中将多个时间序列图中的"Gas.temp“移动到右y轴。

非常感谢..！

Answer 1

我认为geom_ts()从FOQAT包是一个简单的方法。请试试这个例子：

library(foqat)
head(aqi)
geom_ts(
  df=aqi,   
  yl=4, yr=6,   
  llist=c(4, 6),   
  yllab=bquote(NO[2]~" "~(ppbv)), yrlab=bquote(O[3]~" "~(ppbv)), xlab="Datetime",  
  llab=list(bquote(NO[2]~" "), bquote(O[3]~" ")),  
  lcc=c("#096dd9","#ff4d4f"),
  ana=FALSE
)

#                Time        NO     NO2       CO SO2      O3
#1 2017-05-01 01:00:00 0.0376578 2.79326 0.256900  NA 56.5088
#2 2017-05-01 01:01:00 0.0341483 2.76094 0.254692  NA 57.0546
#3 2017-05-01 01:02:00 0.0310285 2.65239 0.265178  NA 57.6654
#4 2017-05-01 01:03:00 0.0357016 2.60257 0.269691  NA 58.7863
#5 2017-05-01 01:04:00 0.0337507 2.59527 0.273395  NA 59.0342
#6 2017-05-01 01:05:00 0.0238120 2.57260 0.276464  NA 59.2240

​

​