Adaugă o medie glisantă continuă la datele privind șomajul
Pe lângă măsurile discrete, cum ar fi sumele cumulate de la începutul anului, poate fi util să adaugi la datele tale de tip serie temporală o sumă sau o medie glisantă.
În acest scop, să revenim la datele tale lunare din obiectul unemployment. Deși nivelurile statice ale șomajului pentru o anumită lună sunt informative, o imagine mai amplă a mediului economic ar putea necesita indicatori glisanți calculați pe mai multe luni.
Pentru aceasta, vei folosi comanda rollapply(), care primește un obiect de tip serie temporală, o dimensiune a ferestrei width și un argument FUN ce specifică funcția aplicată fiecărei ferestre glisante.
Acest exercițiu face parte din cursul
Studiu de caz: Analiza seriilor de timp pentru un oraș în R
Instrucțiuni pentru exercițiu
- Folosește
rollapply()pentru a calcula media glisantă anuală a șomajului din SUA. Asigură-te că specifici coloanausdin setul de dateunemployment, că setezi argumentulwidthla numărul corespunzător de perioade lunare și că setezi argumentulFUNlamean. Salvează media glisantă în obiectulunemploymentsub numeleyear_avg. - Reprezentați grafic cei doi indicatori ai șomajului din SUA (
usșiyear_avg) folosindplot.zoo(). Setează argumentulplot.typela"single"pentru a afișa ambele măsuri în același panou.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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)