我想秒转换为小时分和秒[R 。
例
86400seconds-1day
gmdate("d H:i:s",86400)
这就是我尝试过的方式。
你可以试试
library(lubridate)
seconds_to_period(86400)
#[1] "1d 0H 0M 0S"
seconds_to_period(48000)
#[1] "13H 20M 0S"
如果你需要 format
td <- seconds_to_period(86400)
sprintf('%02d %02d:%02d:%02d', day(td), td@hour, minute(td), second(td))
#[1] "01 00:00:00"
如果持续>99
数天,
td <- seconds_to_period(1e7)
sprintf('%03d %02d:%02d:%02d', day(td), td@hour, minute(td), second(td))
#[1] "115 17:46:40"
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句