在R中将小时和分钟添加到24小时时间

Question

它m trying to find a way to create a column of the hours of arrival of different individuals from 18:30, by adding the hours and minutes to 18:30, but it doesn工作，每次我尝试将我想要添加的小时和分钟的列格式从“因子”转换为时间格式（例如 chron 或 POSIXct）时，它会添加今天的日期，我想仅添加小时和分钟，而不考虑日期。

例如，我想将 03:38 小时添加到 18:30，即 22:08。因此，我想找到一种方法来创建一个包含所有最后时间（每个人到达的时间）的专栏。另一个示例是将 00:47 小时添加到 18:30，即 19:17。

我尝试将小时+分钟转换为数字格式，然后将其添加到 18.5（即 18:30，只是数字格式），然后我到达了最后几个小时，但它们是数字格式，并且我希望它们以小时为单位。例如：

我将 3.6425980（即 03:38）添加到 18.5（即 18:30），最后一个小时是 22.14260（即 22:08），但我不知道如何将 22.14260 转换为 22:08。我需要对大量数据执行此操作，因此我需要一个执行上述操作之一的代码。

有人能帮我吗？

谢谢！

Answer 1

一种选择是使用lubridate

time <- c("18:30", "18:30")
duration <- c("3:38", "00:47")

library(lubridate)
hms(hm(time) + hm(duration), roll = T)
#[1] "22H 8M 0S"  "19H 17M 0S"