Преобразуйте квартальные данные в годовые данные

Question

У меня есть квартальные данные, и я бы хотел, чтобы они были годовыми.Я сделал это до сих пор

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

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

Я получаю

объект 'as.year' не найден

Я действительно не могу понять, какв противном случае ... Спасибо за вашу помощь

Answer 1

Если realGDP является объектом zooreg, определенным в первой строке кода в вопросе, то сначала обратите внимание, что класс yearqtr внутренне представляет год / месяц как год плюс 0 для Q1, 1/4 для Q2, 2/ 4 для Q3 и 3/4 для Q4.Таким образом, целочисленная часть объекта 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)

Answer 2

Извините, я использую ответ вместо комментариев, у меня нет соответствующих прав. Трудно помочь вам, не видя, как выглядят ваши данные в контексте воспроизводимого примера. Может быть полезно что-то вроде приведенного ниже, но, опять же, трудно понять, не понимая данных.

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