如何在R中对时间序列数据（XTS对象）进行箱线图绘制

Question

我有一些时间序列数据（18841 obs，3个变量），我已将其导入到R中，并使用xts使其成为时间序列对象。参见下面的代码

extractTimeinSecond() {
   file=$1 # /a/very/long/path/to/my/files/2019-07-02_06_12_55_SOME_FOO_BAR.log
   shortfile=$(basename $file) # 2019-07-02_06_12_55_SOME_FOO_BAR.log
   time=$(echo $shortfile | cut -d '_' -f 2,3,4) # 06_12_55
   h=$(( $(echo $time | cut -d '_' -f1) * 60 * 60 )) # 06 * 60 * 60 = 21600
   m=$(( $(echo $time | cut -d '_' -f2) * 60 )) # 12 * 60 = 720
   s=$(echo $time | cut -d '_' -f3) # 55
   echo $(( $h + $m + $s )) # 21600 + 720 + 55 = 22375
}

现在mytimeseries1是一个xts对象，具有变量var1，var2和var3。 我想在几个月或几年的组中对这些变量进行箱线绘图（任意一个）。请帮助使用R代码生成箱形图。

我已经尝试过了：

library(ggplot2)
library(tseries)
require(zoo)
require(xts)
dates=seq(as.Date("1960/06/1"), as.Date("2011/12/31"), "days")
mytimeseries1 = xts(mydataset, order.by = dates)

但没有成功，请帮忙。