R убрать субботу и воскресенье из еженедельного анализа сезонности с пророком

Question

Используя библиотеку пророка, я могу извлечь еженедельную сезонность.

library("prophet")

history <- data.frame(ds = seq(as.Date('2015-01-01'), as.Date('2016-01-01'), by = 'd'),y = sin(1:366/200) + rnorm(366)/10)

m <- prophet(history)
future <- make_future_dataframe(m, periods = 365)
forecast <- predict(m, future)
prophet_plot_components(m, forecast)

Но этот анализ включает субботу и воскресенье, даже если базовые данные не включают эти дни. Какие параметры мне нужно добавить в функцию пророка, чтобы исключить сб и вс? Спасибо за вашу помощь.

Answer 1

Я не знаю, есть ли в пакете prophet опция для удаления выходных, но вы можете использовать функцию weekdays в базе R, чтобы определить, какой день недели является датой, а затем исключить субботу и воскресенье, например, с dplyr:

history <- data.frame(ds = seq(as.Date('2015-01-01'), as.Date('2016-01-01'), by = 'd'),y = sin(1:366/200) + rnorm(366)/10)
nrow(history)
#> [1] 366

library(dplyr)
history_week <- history %>% 
  mutate(wd = weekdays(ds)) %>% 
  filter(wd != c("Saturday", "Sunday"))
nrow(history_week)
#> [1] 314