r - 将数值转换为 R 中的时间

Question

我得到了一个时间文件，以分.秒为单位，格式如下:

TimeInput <- c(13.66, 14.08, 12.86)

如何将数值(例如 13.66)转换为分:秒格式，具体来说，14:06 或 14 分 6 秒？

我的预期输出是:

TimeInput <- c(14:06, 14:08, 13:26)

Answer 1

我们可以尝试不使用任何外部包

v1 <- (TimeInput-floor(TimeInput)) - 0.60
v2 <- ifelse(v1 > 0, floor(TimeInput) + 1 + v1, TimeInput)
d1 <- data.frame(MinSec = sub(".", ":", v2, fixed = TRUE), 
           TimeRound = floor(v2), stringsAsFactors=FALSE)
d1
#  MinSec TimeRound
#1  14:06        14
#2  14:08        14
#3  13:26        13