Calculează și reprezintă grafic o medie mobilă
Ultimul indicator de baseball pe care vrei să îl generezi este L10 – media mobilă a rezultatelor câștig/pierdere din ultimele zece meciuri. În timp ce media cumulativă câștig/pierdere îți arată cum se descurcă echipa în ansamblu, indicatorul L10 oferă o imagine mai specifică a performanței recente. Dincolo de lumea sportului, această măsură este comparabilă cu un indicator financiar axat pe performanța recentă a unui portofoliu.
Pentru a genera o medie mobilă a rezultatelor câștig/pierdere, revin la comanda rollapply() folosită în capitolul anterior. În acest caz, vei aplica funcția mean pe ultimele 10 meciuri jucate de Red Sox la orice moment dat din sezonul 2013.
Obiectul redsox_xts, inclusiv coloana win_loss, este disponibil în spațiul tău de lucru.
Acest exercițiu face parte din cursul
Studiu de caz: Analiza seriilor de timp pentru un oraș în R
Instrucțiuni pentru exercițiu
- Generează un nou obiect xts care conține doar sezonul 2013. Numește acest obiect
redsox_2013. - Folosește
rollapply()pentru a calcula indicatorullastten_2013pe baza coloaneiwin_lossdinredsox_2013. Seteazăwidthla10pentru a include ultimele zece meciuri jucate de Red Sox și setează argumentulFUNlameanpentru a genera o medie a coloaneiwin_loss. - Folosește
plot.xts()pentru a vizualiza noul indicator în sezonul 2013. Lasă argumentulylimașa cum este în codul precomplet.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# Select only the 2013 season
redsox_2013 <- ___["___"]
# Use rollapply to generate the last ten average
lastten_2013 <- rollapply(___$___, width = ___, FUN = ___)
# Plot the last ten average during the 2013 season
plot.xts(___, ylim = c(0, 1))