将列从军事时间转换为标准时间

我试图将显示道路交通事故时间的列从军事时间转换为标准时间。 数据如下所示：

Col1 Time..24hr. 1 1404 2 322 3 1945 4 1005 5 945 

那么我想转换到12小时，所以'322'我想'3'，例如。 非常感谢

Answer 1

给定你的标准 – 322表示为3，2045表示为20 – 用trunc()除以100然后舍入为0。

  time_24hr <- c(1404, 322, 1945, 1005, 945) trunc(time_24hr / 100) 

Answer 2

如何使用模运算符%% ？

 time_24hr <- c(1404,322,1945,1005,945) time_12hr <- time_24hr %% 1200 ampm <- c("AM","PM")[(time_24hr %/% 1200) + 1] 

（我不知道这将如何处理中午和午夜…）

Answer 3

您也可以使用lubridate包如下

 library(lubridate) time_24hr <- c(1404, 322, 1945, 1005, 945) hm(time_24hr / 100)