У меня есть вектор с информацией о времени и датой, отмеченной только один раз в день. Мне нужно преобразовать вектор в пригодный для использования формат, такой как POSIXlt
. Время упорядочено, где все времена (%H:%M
) в течение дня относятся к последней дате, отмеченной перед временем без даты.
t <- structure(c(6L, 1L, 2L, 3L, 4L, 5L, 10L, 7L, 8L, 9L),
.Label = c("00:15", "00:25", "00:35", "00:45", "02:05", "20.01.2013; 0:05",
"20:48", "20:58", "21:08", "25.01.2013; 20:38"), class = "factor")
Из нескольких предыдущих ответов на вопросы о преобразовании фактора в дату (например, здесь) я знаю, как преобразовать t[c(1, 7)]
.
t1 <- strptime(as.character(t[c(1, 7)]), format = "%d.%m.%Y; %H:%M")
# t1
# [1] "2013-01-20 00:05:00 CET" "2013-01-25 20:38:00 CET"
Однако как я могу распространить отсутствующую дату на оставшиеся значения, чтобы они правильно конвертировались?