Мне нужно импортировать и преобразовать эти почасовые данные в tsibble, и я использую:
data = read.csv("data.csv", header = TRUE, sep = ";",stringsAsFactors = FALSE)
data$Date <- ymd_hms(data$Date)
dados = as_tsibble(data, index = Date)
> dados
# A tsibble: 23,400 x 2 [1h] <UTC>
Date Demand
<dttm> <int>
1 2017-05-01 00:00:00 3
2 2017-05-01 01:00:00 2
3 2017-05-01 02:00:00 2
4 2017-05-01 03:00:00 0
Но когда я пробую простую линейную модель, она работает без ошибок, но модель пуста:
fit <- dados %>% model(Demand ~TSLM())`
> fit1
# A mable: 1 x 1
`TSLM(Demand ~ trend())`
<model>
1 <TSLM>
Я думаю, что проблема в том, что когда я конвертирую данные в tsibble, я не даю Ключ. Я пытаюсь использовать Date и Demand в качестве ключа, но он также не работает.
1. В этом случае, что будет ключом? 2. Мне это нужно или проблема не в этом?
Заранее спасибо.