ошибка при работе с prophet

Производится анализ временного ряда с использованием языка R и библиотеки prophet (также стоят библиотеки tidyverse, magrittr, dplyr, expm, ggplot2, devtools). Анализ производится по примеру который показан в книжке https://ranalytics.github.io/tsa-with-r/ch-intro-to-prophet.html#%D1%83%D1%81%D0%BB%D0%BE%D0%B2%D0%BD%D1%8B%D0%B5-%D1%80%D0%B5%D0%B6%D0%B8%D0%BC%D1%8B-%D1%81%D0%B5%D0%B7%D0%BE%D0%BD%D0%BD%D0%BE%D1%81%D1%82%D0%B8 конкретно - 6 глава вся и в пункте 6.6.3 возникли проблемы. Что было сделано? 1)загружен файл df9 в формате csv (ms-dos) 2) выполнена функция

is_winter <- function(ds) {
  month <- as.numeric(format(time(ds, '%m')))
  return(month=1)
}

3. выполнен участок кода

   df9$winter <- is_winter(df9$ds)

получена ошибка Error in h(simpleError(msg, call)) : ошибка при оценке аргумента 'x' при выборе метода для функции 'format': non-numeric argument to binary operator 4) далее попытались по-другому решить проблему применили функцию к df9

df9_train <- df9 %>%
  as.data.frame()

далее проделали все то же самое уже для такого набора данных то есть df9_train$winter <- is_winter(df9_train$ds) получили такую ошибку Error in h(simpleError(msg, call)) : ошибка при оценке аргумента 'x' при выборе метода для функции 'format': non-numeric argument to binary operator (такую же)

также в ходе решить такую проблему разного рода ошибки выскакивали, например, Error in prettyNum(.Internal(format(x, trim, digits, nsmall, width, 3L, : invalid 'trim' argument и такая NAs introduced by coercion

что с этим всем можно поделать? что может быть причиной такого? до этого пункта все шло хорошо в 6 главе