時系列解析で月次データを四半期に集約する(3ヶ月の合計や平均を計算する)ことはよくある。以下はstats, zoo, xtsを使った場合。 まず準備: # 2010年1月から12月までの月次データを生成する rm(list=ls()) dataLength <- 12 set.seed(1) # to make it reproducible data1 <- rnorm(dataLength) statsのtsオブジェクトに対してstatsのaggregateを使う場合: dataMonthTs <- ts(data1, start=c(2010,1), frequency=12) dataQuartTs <- aggregate(dataMonthTs, nfrequency = 4, FUN = sum) dataQuartTs 以上のやり方はzooもxtsもなかった10年以上前には