chron到xts -保留日期-时间格式

Question

我有一个数据框架data，如下所示：

dim(data)
# [1] 66955      2
library(chron)
data <- structure(list(`Date-Time` = structure(c(11320.6592476852,
  11320.6661921296, 11324.3958564815, 11324.4022569444),
  format = structure(c("y/m/d", "h:m:s"), .Names = c("dates", "times")),
  origin = structure(c(1, 1, 1970), .Names = c("month", "day", "year")),
  class = c("chron", "dates", "times")), Price = c(14.8125, 14.875,
  14.9375, 14.9375)), .Names = c("Date-Time", "Price"),
  row.names = 18620:18623, class = "data.frame")

data的第一列是"chron“级的”日期“”时间“。日期时间格式为(yy/mm/dd :m:s).我试图将data[,2]转换为xts对象，以便使用函数makeReturns。

我试过：

library(xts)
as.xts(data[,2] , order.by=data[,1], format=c(dates="y/m/d", times="h:m:s"))

但是，这给了我以下内容(对于上面的行)：

                       [,1]
(NA NA)             14.8125
(NA NA)             14.8750
(01/01/02 09:30:02) 14.9375
(01/01/02 09:39:15) 14.9375

也就是说，它不承认前两行(日期时间格式(00/12/29 15:49:19)和(00/12/29 15:59:19)为yy/mm/dd (和h:m:s)。事实上，在前两行，年份为"00“(2000)，而在第3和第4行，年份为"01”(2001)，由他转换，但作为一天或一个月。

我如何确保所有的东西都被转换成原来的格式不改变呢？我在format=" "中尝试过几种变体，但都没有效果。

Answer 1

chron似乎没有as.POSIXct方法，默认的as.POSIXct方法可能没有按您希望的方式处理时区，因此您需要将data的第一列转换为字符，然后强制使用POSIXct。

> xts(data[,2], as.POSIXct(as.character(data[,1]), format="(%y/%m/%d %H:%M:%S)"))
                       [,1]
2000-12-29 15:49:19 14.8125
2000-12-29 15:59:19 14.8750
2001-01-02 09:30:02 14.9375
2001-01-02 09:39:15 14.9375