Добавить час, если отсутствует метка времени, используя lubridate

Question

У меня есть список временных меток в факторном формате, который я хочу преобразовать, используя lurbridate.

Однако некоторые временные метки не хватает времени 00:00:00:

2013-12-24 23:00:00 
2013-12-24 
2013-12-24 01:00:00 

Как расширить df$timestamp <- ymd_hms(df$Timestamp_factor) вставить 00:00:00 если время я не хватает?

Answer 1

Вы можете использовать укороченный термин для lubridate, чтобы получить эти отсутствующие параметры. В этом случае, вам не хватает трех параметров час, минуту и ​​второй

ymd_hms(c("2013-12-24 23:00:00", "2013-12-24", "2013-12-24 01:00:00"), truncated = 3) 

Это, однако, всегда будет возвращать 00:00:00 как время