r语言 - 使用指定的增量生成时间或持续时间的向量

Question

如何直接使用时间实现这一点?如果能有一个更优雅的解决方案，我将不胜感激。

times <- c(paste(9, 5*(0:11), sep = ":"),paste(10, 5*(0:11), sep = ":"))
times_as_hm <- lubridate::hm(times)

Answer 1

我们可以这样做

library(lubridate)
times_as_hm2 <- hm("9:0")+ seconds_to_period(5 *(0:23) * 60)

测试

> all.equal(times_as_hm, times_as_hm2)