在R中将时间从数字转换为时间格式

Question

我从xls文件中读取数据。显然，时间不是正确的格式。它如下（例如）

0.3840277777777778
0.3847222222222222
0.3854166666666667

确实，他们应该

09:12
09:13
09:13

我不知道如何将其转换为正确的格式。我搜索了几个线程，所有这些线程都是关于将日期（有/没有时间）转换为正确的格式。

有人可以给我任何线索吗？

Answer 1

您可以将您的数字乘以一天中的秒数（60 * 60 * 24）后使用as.POSIXct

nTime <- c(0.3840277777777778, 0.3847222222222222, 0.3854166666666667)
format(as.POSIXct((nTime) * 86400, origin = "1970-01-01", tz = "UTC"), "%H:%M")
## [1] "09:13" "09:14" "09:15"

Answer 2

另一个选项是来自times

的chron

library(chron)
times(nTime)
#[1] 09:13:00 09:14:00 09:15:00

剥去秒，

substr(times(nTime),1,5)
#[1] "09:13" "09:14" "09:15"

数据

nTime <- c(0.3840277777777778, 0.3847222222222222, 0.3854166666666667)

Answer 3

对于想要相反方式的人：给09:13:00，得到0.3840278

as.numeric(chron::times("09:13:00"))

基本上，这个想法是整整一天是1，所以中午（12pm）是0.5。