Přidání zpožděných cenových efektů
Teď si ověříš, jestli se efekty dočasných změn ceny na prodeje přenášejí i do dalšího období.
Jako dříve posuneme prediktor PRICE zpět pomocí funkce lag(). Výsledek se přiřadí do nové proměnné Price.lag. Proměnná Price.lag se pak přidá do vztahu log(SALES) ~ PRICE. Tento jednoduchý zpožděný model lze rovněž odhadnout pomocí funkce lm().
Toto cvičení je součástí kurzu
Tvorba modelů odezvy v R
Pokyny k cvičení
- Vytvoř zpožděnou proměnnou pro
PRICEs názvemPrice.lag. - Odhadni zpožděný model odezvy vysvětlující
log(SALES)pomocíPRICEaPrice.lag. Použij funkcilm()a výsledek přiřaď opět do objektulag.model. - Získej koeficienty modelu
lag.modelpomocí funkcecoef().
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# Take the lag of PRICE
Price.lag <- lag(___)
# Explain log(SALES) by PRICE and Price.lag
lag.model <- ___(___ ~ ___ + ___, data = sales.data)
# Obtain the coefficients