Använda regression för att testa prognoserna
Efter att ha granskat data visuellt vill du också använda regressionsanalys för att avgöra om det finns en statistiskt signifikant förändring i trenden från de historiska intäkterna till de prognostiserade intäkterna. Kom ihåg att du behöver skapa en trend- (trend) och en shiftvariabel (shift).
I den här övningen finns intäktsdata från föregående övning lagrad i objektet rev. Datan innehåller två tidsserier: historiska intäkter (hist_rev) och prognostiserade intäkter (proj_rev). De historiska intäkterna har positiva värden för de första 10 åren av historisk data och 0 för prognosperioden. De prognostiserade intäkterna har 0 för de första 10 åren och positiva värden under prognosperioden.
Den här övningen är en del av kursen
Aktievärdering i R
Övningsinstruktioner
- Skapa en enskild intäktsserie som kombinerar både historisk och prognostiserad data.
- Lägg till en trendvariabel i
rev_all_dfmed hjälp avseq(). - Lägg till en shiftvariabel i
rev_all_dfmed hjälp avifelse(). - Regrediera
rev_allpåtrendochshift.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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)