Одним из возможных решений является следующее:
data = structure(list(Time.stamp = structure(1:6, .Label = c("05/06/2016 21:13",
"05/06/2016 22:52", "05/06/2016 22:58", "09/06/2016 22:40", "09/06/2016 22:45",
"09/06/2016 22:50"), class = "factor")), .Names = "Time.stamp", class = "data.frame", row.names = c(NA,
-6L))
library(dplyr)
library(lubridate)
data %>%
mutate(Time.stamp = dmy_hm(Time.stamp),
hour = hour(Time.stamp),
min = minute(Time.stamp),
sec = second(Time.stamp)) %>%
arrange(hour, min, sec) %>%
select(Time.stamp)
# Time.stamp
# 1 2016-06-05 21:13:00
# 2 2016-06-09 22:40:00
# 3 2016-06-09 22:45:00
# 4 2016-06-09 22:50:00
# 5 2016-06-05 22:52:00
# 6 2016-06-05 22:58:00
Обратите внимание, что в вашем случае вам не нужен столбец sec
, но я публикую более общее решение.