Додавання запізнілих ефектів ціни
Далі ви перевірите, чи поширюються ефекти тимчасових змін ціни на продажі на наступний період.
Як і раніше, змістіть предиктор PRICE назад за допомогою функції lag(). Результат присвойте до нової змінної Price.lag. Змінну Price.lag додайте до співвідношення log(SALES) ~ PRICE. Цю просту лаг-модель також можна оцінити за допомогою функції lm().
Ця вправа є частиною курсу
Побудова моделей відгуку в R
Інструкції до вправи
- Створіть запізнілу змінну для
PRICEз назвоюPrice.lag. - Оцініть модель із запізненням, що пояснює
log(SALES)за допомогоюPRICEтаPrice.lag. Використайте функціюlm()і знову присвойте результат об'єкту з назвоюlag.model. - Отримайте коефіцієнти моделі
lag.modelза допомогою функціїcoef().
Інтерактивна практична вправа
Спробуйте виконати цю вправу, доповнивши цей зразок коду.
# Take the lag of PRICE
Price.lag <- lag(___)
# Explain log(SALES) by PRICE and Price.lag
lag.model <- ___(___ ~ ___ + ___, data = sales.data)
# Obtain the coefficients