ComenzarEmpieza gratis

Añade una media móvil continua a los datos de desempleo

Además de medidas discretas como las sumas acumuladas del año, puede interesarte añadir una suma o media móvil a tu serie temporal.

Para hacerlo, volvamos a tus datos mensuales de unemployment. Aunque puede interesarte el nivel estático de desempleo en un mes dado, para tener una visión más amplia del entorno económico conviene usar indicadores móviles a lo largo de varios meses.

Para ello, usarás el comando rollapply(), que toma un objeto de serie temporal, un tamaño de ventana width y un argumento FUN que se aplica a cada ventana móvil.

Este ejercicio forma parte del curso

Estudio de caso: Análisis de series temporales de una ciudad en R

Ver curso

Instrucciones del ejercicio

  • Usa rollapply() para calcular la media móvil anual del desempleo de EE. UU. Asegúrate de especificar la columna us de tus datos unemployment, establecer el argumento width al número adecuado de periodos mensuales y definir el argumento FUN como mean. Guarda tu media móvil en tu objeto unemployment como year_avg.
  • Representa tus dos indicadores de desempleo de EE. UU. (us y year_avg) usando plot.zoo(). Establece el argumento plot.type a "single" para colocar ambas medidas en el mismo panel.

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

# 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)
Editar y ejecutar código