Создание переменных для праздников и акций

В предыдущем упражнении мы заметили признаки сезонности — теперь давайте убедимся, что они действительно существуют. Ваше руководство считает, что спрос на продукты возрастает в недели Рождества, Нового года и Дня святого Валентина. Отдел маркетинга также сообщает, что последние 5 лет проводил акции на неделе перед Днём матери. Создадим бинарную индикаторную переменную для Нового года!

Это упражнение является частью курса

Прогнозирование спроса на продукты в R

Посмотреть курс

Инструкции к упражнению

Создайте индекс дат для недель Нового года в обучающей выборке и назовите его n.dates.
Постройте объект xts с именем newyear, используя индекс дат n.dates.
Создайте последовательность из 154 дат начиная с 19 января 2014 г. (временной диапазон обучающей выборки) и назовите её dates_train.
Объедините объект newyear с датами обучающей выборки из предыдущего пункта и заполните все пропущенные значения нулями.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Create date indices for New Year's week
n.dates <- as.Date(c("2014-12-28", "2015-12-27", "2016-12-25"))

# Create xts objects for New Year's
newyear <- as.xts(rep(1, 3), order.by = ___)

# Create sequence of 154 weeks for merging
dates_train <- seq(as.Date("2014-01-19"), length = ___, by = ___)

# Merge training dates into New Year's object
newyear <- ___(newyear, ___, fill = ___)

Редактировать и запускать код