从DD舍入润滑周期对象：HH：MM：SS到HH：MM：SS

Question

我有一个聚合列，包含以下形式的lubridate期间对象

sum_times
1d 15H 25M 0S

我希望它是HH：MM：SS形式，这意味着如果小时数超过24，我不希望我的格式有几天，而是继续计算小时数。看起来像这样的东西

sum_times
39H 25M 0S

Answer 1

下面的例子应该带你朝正确的方向：

span <- interval(ymd_hms("2009-01-01 00:00:00"), ymd_hms("2010-02-02 01:01:01")) #interval
as.period(span, unit = "hour")
[1] "9529H 1M 1S"
as.period(span, unit = "day")
[1] "397d 1H 1M 1S"