POSIXct返回NA

Question

我的数据帧结构是这样的：

 str(marc)
 $ Data   : Date, format: "2015-10-31" "2015-10-31" "2015-10-31" ...
 $ Hora   :Class 'times'  atomic [1:351] 0.792 0.792 0.792 0.792 0.5 ...
 .. ..- attr(*, "format")= chr "h:m:s"

我正在尝试创建一个连接数据和Hora的新列：

marc$Timestamp=as.POSIXct(paste(marc$Data, marc$Hora), format = "%Y-%m-%d %H:%M:%S")

但是as.POSIXct正在返回NAs。

$ Timestamp: POSIXct, format: NA NA NA ...

我使用相同的过程来创建与其他数据帧的时间戳，并且它已经工作。这次我做错了什么？非常感谢!

> dput(marc$Hora)
structure(c(0.791666666666667, 0.791666666666667, 0.791666666666667, 
0.791666666666667, 0.5, 0.833333333333333, 0.833333333333333, 
0.833333333333333, 0.708333333333333, 0.833333333333333, 0.708333333333333, 
0.708333333333333, 0.604166666666667, 0.604166666666667, 0.604166666666667, 
0.708333333333333, 0.8125, 0.75, 0.541666666666667, 0.75, 0.541666666666667, 
0.541666666666667, 0.541666666666667, 0.8125, 0.8125, 0.520833333333333, 
0.8125, 0.8875, 0.9375, 0.9375, 0.9375, 0.8875, 0.895833333333333, 
...
 format = "h:m:s", class = "times")

在使用POSIXct之前，我运行了：

marc$Hora=times(marc$Hora)

Hora应该是H:M:S，但它没有改变

Answer 1

我想我认出了来自chron包的类和格式(不是"Chron")：

library(chron)
 Hora

# [1] 19:00:00 19:00:00 19:00:00 19:00:00 12:00:00 20:00:00 20:00:00 20:00:00 17:00:00
#[10] 20:00:00 17:00:00 17:00:00 14:30:00 14:30:00 14:30:00 17:00:00 19:30:00 18:00:00
#[19] 13:00:00 18:00:00 13:00:00 13:00:00 13:00:00 19:30:00 19:30:00 12:30:00 19:30:00
#[28] 21:18:00 22:30:00 22:30:00 22:30:00 21:18:00 21:30:00

所以它们是以小时为界限的值。如果您使用具有该`知识的str信息构建一个示例：

 marc <- data.frame( Data =as.Date("2015-10-31", "2015-10-31", "2015-10-31"),
 Hora=structure(c( 0.792, 0.792, 0.792),format = "h:m:s", class = "times"))
 marc
#----------------
        Data     Hora
1 2018-11-03 19:00:29
2 2018-11-03 19:00:29
3 2018-11-03 19:00:29

由于四舍五入，秒数略有偏差。无论如何，您应该将Hora值强制转换为paste-ing之前的字符：

as.POSIXct( paste(marc$Data,  as.character(marc$Hora) ) )
#[1] "2018-11-03 19:00:29 PDT" "2018-11-03 19:00:29 PDT" "2018-11-03 19:00:29 PDT"