我必须为 2000 个不同的时间序列创建每小时预测。我的系列中每小时和每周的季节性很强。为了处理每小时的季节性,我使用了season("day")
选项。但是,我想season("week")
每周会创建 168 个假人,这将是计算问题的问题。
你知道使用 tsibble 或 fabletools 包创建工作日假人的快速方法吗?
ts_forecast1 <- train%>% filter(store_number==288) %>% collect()%>%
mutate(store_number = factor(store_number)) %>% group_by(store_number) %>%
filter(sales!=0) %>% tsibble::fill_gaps(sales=100) %>%
fabletools::model(Arima = ARIMA(log(sales) ~ season("day") +fourier("week", K = 8)))