汇总R中时间序列的选定月份的年度总和

Question

我有多年的月度数据时间序列。现在我想计算每年的不同指数，例如（i）年度金额和（ii）特定月份（7月和8月）的总和。我想使用aggregate中的R函数和zoo - 包。

计算年度总和不是问题......

# Test dataset
z_test <-  as.zoo(ts(rnorm(200), start=c(1922,1), frequency=12))

# Yearly sum
as.year <- function(x) as.numeric(floor(as.yearmon(x)))
yearsum <- as.ts(aggregate(z_test, as.year, sum))

..但是，使用聚合返回特定月份总和的最佳方法是什么？例如，我希望每年7月和8月的总和（与yearsum类似）

JulAug_sum <-?

Answer 1

希望这有帮助

3,2,1,0