我在活动中花费了几分钟的时间。我想将这个数字转换成小时和分钟,将数字考虑在内,但不会产生秒数。这是一个例子:
minutes<-c(81.4398, 50.9903,107.5511,433.3051,10.1234)
minutes
我希望以时钟格式得出结果:
hrsmins<- c(1:21,0:51,1:48,7:13,0:10)
请注意,结果不显示当天的时钟时间,但显示活动中的小时和分钟。我有一个非常大的数据集(数百万集)。所以,如果有人能提供有效的转换方式,我将不胜感激。
答案 0 :(得分:4)
我们可以尝试chron
library(chron)
substr(times((minutes%/%60 + minutes%%60 /60)/24), 1, 5)
#[1] "01:21" "00:50" "01:47" "07:13" "00:10"
或者可能是
sub(":\\d{2}", "", times((minutes%/%60 + minutes%%60 /3600)/24))
#[1] "01:21" "00:51" "01:48" "07:13" "00:10"