Calcola e traccia una media mobile
L’ultimo indicatore di baseball che vuoi generare è la L10, cioè la media mobile vittorie/sconfitte delle ultime dieci partite. Mentre la media cumulativa vittorie/sconfitte ti dice come sta andando la squadra nel complesso, l’indicatore L10 offre un quadro più preciso delle prestazioni recenti della squadra. Al di fuori dello sport, questa misura è paragonabile a un indicatore finanziario focalizzato sulle prestazioni recenti di un portafoglio.
Per generare una media mobile vittorie/sconfitte, torna al comando rollapply() usato nel capitolo precedente. In questo caso, vorrai applicare la funzione mean alle ultime 10 partite giocate dai Red Sox in qualsiasi momento della stagione 2013.
L’oggetto redsox_xts, inclusa la colonna win_loss, è disponibile nel tuo workspace.
Questo esercizio fa parte del corso
Caso di studio: analisi di serie temporali cittadine in R
Istruzioni dell'esercizio
- Genera un nuovo oggetto xts contenente solo la stagione 2013. Chiama questo oggetto
redsox_2013. - Usa
rollapply()per calcolare il tuo indicatorelastten_2013basato sulla colonnawin_lossinredsox_2013. Impostawidthuguale a10per includere le ultime dieci partite giocate dai Red Sox e imposta l’argomentoFUNsumeanper calcolare la media della colonnawin_loss. - Usa
plot.xts()per visualizzare il nuovo indicatore durante la stagione 2013. Lascia l’argomentoylimcosì com’è nel codice precompilato.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# 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))