Aggiungi una media mobile continua ai dati sulla disoccupazione
Oltre a misure discrete come le somme dall’inizio dell’anno, potresti voler aggiungere una somma o una media mobile ai tuoi dati di serie temporali.
Per farlo, torniamo ai dati mensili di unemployment. Anche se può interessarti il livello della disoccupazione in un singolo mese, per avere un quadro più ampio della situazione economica può essere utile calcolare indicatori mobili su più mesi.
Per questo userai il comando rollapply(), che accetta un oggetto di serie temporale, una dimensione della finestra width e un argomento FUN da applicare a ciascuna finestra mobile.
Questo esercizio fa parte del corso
Caso di studio: analisi di serie temporali cittadine in R
Istruzioni dell'esercizio
- Usa
rollapply()per calcolare la media mobile annuale della disoccupazione negli US. Assicurati di specificare la colonnausdei tuoi datiunemployment, imposta l’argomentowidthal numero appropriato di periodi mensili e imposta l’argomentoFUNsumean. Salva la tua media mobile nell’oggettounemploymentcomeyear_avg. - Traccia i due indicatori della disoccupazione negli US (
useyear_avg) usandoplot.zoo(). Imposta l’argomentoplot.typesu"single"per visualizzare entrambe le misure nello stesso pannello.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# 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)