Заполнение отсутствующих значений даты и времени в выходном векторе

Question

Я выполнил уникальное извлечение из своих значений даты и времени для извлечения уникальных секунд в моих временных рядах.

unique_seconds <- unlist(unique(all_secondsDayData)) 

У меня есть недостающие значения в моем выходе следующим образом:

(см "2015-12-03 9:51:26")

[1116] "2015-12-03 09:51:24" "2015-12-03 09:51:25" "2015-12-03 09:51:27" "2015-12-03 09:51:28" "2015-12-03 09:51:29" 

Как заполнить свой вектор с эти недостающие значения? Не беспокойся о дате, потому что это данные за один день. Проблема заключается в заполнении вектора отсутствующими значениями секунд.

Answer 1

Похоже, вы просто хотите получить регулярную временную последовательность на 1 секунду. Вы можете попробовать использовать seq.POSIXt:

x <- c("2015-12-03 09:51:24", "2015-12-03 09:51:25", "2015-12-03 09:51:27", 
     "2015-12-03 09:51:28", "2015-12-03 09:51:29") 

x <- strptime(x, "%Y-%m-%d %H:%M:%S") 

RANGE <- range(x) 
seq.POSIXt(RANGE[1], RANGE[2], by = 1) 

#[1] "2015-12-03 09:51:24 GMT" "2015-12-03 09:51:25 GMT" 
#[3] "2015-12-03 09:51:26 GMT" "2015-12-03 09:51:27 GMT" 
#[5] "2015-12-03 09:51:28 GMT" "2015-12-03 09:51:29 GMT" 

Вы можете прочитать ?seq.POSIXt для спецификации by. Если он задан как один номер, он интерпретируется как «второй».