прогнозирование на тестирование и обучение в R

Question

У меня есть набор данных с 27 октября 2015 года по 24 февраля 2016 года с интервалом времени 1 минута. Данные zz как ниже:

Подробную информацию о данных zz можно найти по этой ссылке: [https://drive.google.com/file/d/1IzoIpyiedh_33UJ5SbdrwJTj6cEGSqtZ/view?usp=sharing]

,dataid,meter_value
2015-10-27 19:50:00,1103,183138
2015-10-27 19:51:00,1103,183138
2015-10-27 19:52:00,1103,183138
:
2016-02-24 00:38:00,1103,197015.985697259
2016-02-24 00:39:00,1103,197015.992848629
2016-02-24 00:40:00,1103,197016

Я пытался прогнозировать meter_value с "2016-01-01 00:00:00 до 2016-02-24 00:40:00" и сравнивать с реальными данными, но мои точки прогнозирования неверны.

Когда я конвертирую две точки прогнозирования, я получаю этот вывод, который не верен. Я ожидал получить прогнозные баллы "2016-01-01 00:00:00 до 2016-02-24 00:40:00", но я получил за прогнозные баллы от 93851 до 94850

> as.POSIXct.Date(94850)
[1] "2229-09-10 08:00:00 +08"
> as.POSIXct.Date(93851)
[1] "2226-12-16 08:00:00 +08"

Мой R-код для создания временных рядов и прогнозирования, как показано ниже:

start_time <- as.POSIXct("2015-10-27 19:50")
end_time   <- as.POSIXct("2015-12-31 23:59")
mytsTT2 <- ts(zoo(
  zz$meter_value,
  order.by = seq.POSIXt(start_time, end_time, by = "mins"),
  frequency = 10080
))

str(mytsTT2)



  # Time-Series [1:93850] from 1 to 93850: 183138 183138 183138 183138 183138 ...
    # - attr(*, "index")= POSIXct[1:93850], format: "2015-10-27 19:50:00" ...
    # - attr(*, "frequency")= num 10080
    Forecasting R-code:

autoplot(forecast(mytsTT2,1000))
write.csv(forecast(mytsTT2,1000),"D1103-mytsTT2-1000fc.csv",quote=F)

Не могли бы вы помочь мне установить правильные точки прогнозирования, а также преобразовать их в формат даты и времени?