Как создать временную серию для данных, которые собираются каждые 1 час с интервалом 15 минут - PullRequest
0 голосов
/ 02 октября 2019

Данные доступны с (2019-01-01 00: 00: 00.0) до (2019-04-15 23: 45: 00.0)

Я пробовал это:

prodapt.ts.PmdAve <- ts(prodapt[,30], start = c(2019,1), frequency = 4)

Мне нужен временной ряд на почасовой основе, который записывается с интервалом времени 15 минут.

1 Ответ

1 голос
/ 02 октября 2019

Использование seq:

start <- as.POSIXct("2019-01-01 00:00:00.000", "%Y-%m-%d %H:%M:%OS")
end   <- as.POSIXct("2019-04-15 23:45:00.000", "%Y-%m-%d %H:%M:%OS")
x <- seq(start, end, by=60*15)
x[c(1:10, (length(x)-9):length(x))]

 [1] "2019-01-01 00:00:00" "2019-01-01 00:15:00" "2019-01-01 00:30:00"
 [4] "2019-01-01 00:45:00" "2019-01-01 01:00:00" "2019-01-01 01:15:00"
 [7] "2019-01-01 01:30:00" "2019-01-01 01:45:00" "2019-01-01 02:00:00"
[10] "2019-01-01 02:15:00" "2019-04-15 21:30:00" "2019-04-15 21:45:00"
[13] "2019-04-15 22:00:00" "2019-04-15 22:15:00" "2019-04-15 22:30:00"
[16] "2019-04-15 22:45:00" "2019-04-15 23:00:00" "2019-04-15 23:15:00"
[19] "2019-04-15 23:30:00" "2019-04-15 23:45:00"
...