我目前使用该difftime()函数来获取两个Sys.time()对象之间的经过时间。
IE ：
t1 <- Sys.time()
t2 <- Sys.time()
elapsed_time <- difftime(t2, t1)
当前输出类似于：
5.188578 days
我想得到一个以这种方式显示经过时间的输出：
5 days : 4 hours : 30 mins : 15 secs
或类似的东西。
我已经尝试过该strptime()功能，但它似乎适用于日期，所以我不确定如何使用它。
我还查看了periods()似乎给出如下输出的 lubridate 函数：“3m 12d 0H 0M 0S”（这会很棒），但它似乎不适用于我的 elapsed_time 对象。
我还查看了 stackoverflow 和 google，但没有找到我想要的答案。
所以我想知道是否有人可以给我一些关于如何进行的线索。谢谢你。
编辑：我通过戴夫的评论和如何获得具有多个单位页面的输出的时差找到了一个不错的答案。
library(lubridate)
t1 <- Sys.time()
t2 <- Sys.time()
elapsed_time <- difftime(t2, t1)
as.period(elapsed_time)
输出结果格式为：
"3H 37M 55S"