将季度数据转换为年度数据

Question

我有季度数据，我希望它们是年度数据。到目前为止，我已经做到了

realGDP <- zooreg(realGDP, start=as.yearqrt("1980 Q1"), 
                frequency = 4)

realGDP <- aggregate(realGDP, as.year, mean)

我得到

  

找不到对象“年”

我真的不知道如何将其汇总... 谢谢您的帮助

Answer 1

对不起，我使用的是答案，而不是评论，没有适当的权限。在可重现的示例环境中，如果看不到您的数据是很难的，那么将很难为您提供帮助。诸如此类的内容可能会有所帮助，但在不了解数据的情况下又很难知道。

realGDP <- realGDP %>% 
  dplyr::group_by(year = lubridate::year(quarter)) %>% 
  dplyr::summarize(value = mean(value))

Answer 2

如果realGDP是问题的第一行代码中定义的zooreg对象，则首先请注意，yearqtr类内部表示年/月作为年份，加Q1的0，即1/4对于Q2，对于Q3是2/4，对于Q4是3/4。因此，yearqtr对象的整数部分是年份：

library(zoo)

aggregate(realGDP, as.integer, mean)
## 1980 1981 1982 
##  2.5  6.5  9.5 

注意

问题应具有完整的可重复输入。这次我提供了一些：

library(zoo)
realGDP <- zooreg(1:10, start = as.yearqtr("1980 Q1"), freq = 4)