Добавление непрерывного скользящего среднего к данным о безработице

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

Для этого вернёмся к месячным данным unemployment. Уровень безработицы в отдельно взятом месяце — полезный показатель, однако для понимания общей экономической ситуации могут понадобиться скользящие индикаторы, охватывающие несколько месяцев.

В этом поможет команда rollapply(), которая принимает объект временного ряда, размер окна width и аргумент FUN — функцию, применяемую к каждому скользящему окну.

Это упражнение является частью курса

Практический пример: анализ городских временных рядов в R

Посмотреть курс

Инструкции к упражнению

С помощью rollapply() вычислите скользящее годовое среднее уровня безработицы в США. Укажите столбец us набора данных unemployment, задайте аргумент width равным соответствующему количеству месячных периодов, а аргумент FUN — значению mean. Сохраните результат в объекте unemployment под именем year_avg.
Постройте график двух показателей безработицы в США (us и year_avg) с помощью plot.zoo(). Задайте аргументу plot.type значение "single", чтобы оба показателя отображались на одной панели.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Use rollapply to calculate the rolling yearly average US unemployment
unemployment$year_avg <- rollapply(___$___, width = ___, FUN = ___)

# Plot all columns of US unemployment data
plot.zoo(unemployment[, c("___", "___")], plot.type = "___", lty = lty, lwd = lwd)

Редактировать и запускать код