将聚合变量合并为R中的一个变量

Question

我使用此代码将100个日期组合到各自的月份中:

cpkmonthly <- aggregate(mydf$AVG, na.rm=TRUE, list(month=months(as.Date(mydf$DATETIME))), mean)

这是R中的输出:

> cpkmonthly
   month         x
1  April 0.4583167
2 August 0.4416660
3   July 0.4436665
4   June 0.4435551
5  March 0.4654443
6    May 0.4523338

我正在寻找一种方法将certian月份合并到几个季度.

Jan-March = q1
April-June = q2
July-Sep = q3
Oct-Dec = q4

有没有办法做到这一点？

输出应该如下所示:

> cpkquarterly
   quarter         x
1       q1 0.4583167
2       q2 0.4416660
3       q3 0.4436665
4       q4 0.4435551

Answer 1

该zoo软件包具有执行此操作的功能:

library(zoo)
as.yearqtr("2012-06", "%Y-%m")

# [1] "2012 Q2"