将每月列值汇总为季度值

Question

Hello Everybody我对R来说几乎是全新的，非常感谢任何帮助。我从2004年到2013年每个月都有以下数据（称为“depressionaggregate”）：

    Month   Year    DepressionCount
1   01      2004    285
2   02      2004    323
3   03      2004    267
4   04      2004    276
5   05      2004    312
6   06      2004    232
7   07      2004    228
8   08      2004    280
9   09      2004    277
10  10      2004    335
11  11      2004    273

我正在尝试创建一个新列，其中包含每个季度每年的汇总值（即2004年第一季度，2004年第二季度等）。我尝试过使用函数聚合但没有成功。希望你能帮我！此致

Answer 1

1）如果DF是输入数据，则将其转换为带有z索引的动物园对象"yearmon"，然后将其汇总到{{ 1}}：

"yearqtr"

，并提供：

library(zoo)

toYearmon <- function(y, m) as.yearmon(paste(y, m, sep = "-"))
z <- read.zoo(DF, index = 2:1, FUN = toYearmon)
ag <- aggregate(z, as.yearqtr, sum)

2）这也有效：

> ag
2004 Q1 2004 Q2 2004 Q3 2004 Q4 
    875     820     785     608