Regressie gebruiken om de projecties te testen
Na een visuele inspectie van de data besluit je ook regressieanalyse te gebruiken om te bepalen of er een statistisch significante verschuiving is in de trend van de historische omzet naar de geprojecteerde omzet. Denk eraan dat je een trendvariabele (trend) en een shift-variabele (shift) moet maken.
Voor deze oefening is de omzetdata die je in de vorige oefening hebt gemaakt opgeslagen in het object rev. In die data heb je twee tijdreeksen: historische omzet (hist_rev) en geprojecteerde omzet (proj_rev). Historische omzet heeft positieve waarden voor de eerste 10 jaar van historische data en 0 voor de projectieperiode. Geprojecteerde omzet heeft 0 voor de eerste 10 jaar en positieve waarden tijdens de projectieperiode.
Deze oefening maakt deel uit van de cursus
Aandelenwaardering in R
Oefeninstructies
- Maak één enkele omzetreeks die zowel de historische als de geprojecteerde data optelt.
- Voeg een trendvariabele toe aan
rev_all_dfmetseq(). - Voeg een shift-variabele toe aan
rev_all_dfmetifelse(). - Regressieer
rev_alloptrendenshift.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
# Create a data frame of single series
rev_all <- ___
rev_all_df <- data.frame(rev_all)
# Create Trend Variable
rev_all_df$trend <- seq(___, nrow(rev_all_df), ___)
# Create Shift Variable
rev_all_df$shift <- ifelse(rev_all_df$trend <= 7, ___, ___)
# Run regression
reg <- lm(___, data = rev_all_df)
summary(reg)