as_tsibble (id (), index ()) Установка Ошибка в .f (.x [[i]], ...): объект 'xxx' не найден

Question

Я учусь, используя tsibble и fable для прогнозирования.Первая трудность здесь - попытка преобразовать мой набор данных в формат tsibble, используя

as_tsibble(
    key=id (product |cate, store), index= date)

(я смотрю видео под названием: tsibble: Tidy структуры данных для поддержки исследования и моделирования данных временного контекста на YouTube)

но я получил ошибку:

Ошибка в .f (.x [[i]], ...): объект 'product' не найден

У меня есть столбец продукта в моем наборе данных: вот мой код для вашей информации

safe_div <- function(upr, lwr) if_else(lwr == 0, 0, upr/lwr)

df_s <- df %>% 
  select(date=Datum, store=ButiN, cate=KategoriNM, product=PluId, quan=Styck, sales=Sales) %>%
  mutate(price= round(safe_div(sales,quan), 2)) %>% 
  as_tibble()

df_s %>% as_tsibble(
    key=id (product |cate, store), index= date)

не уверен, где я ошибаюсь.Любое предложение будет оценено

Вот снимок набора данных df_s для вашей информации