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

时间:2013-11-11 14:19:40

标签: r xts

我的数据框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的第一列属于&#34; chron&#34; &#34;日期&#34; &#34;倍&#34 ;.日期时间格式为(yy / mm / dd h: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)。实际上在前两行中,年份是&#34; 00&#34; (2000),并没有转换,而在第3和第4行,年份是&#34; 01&#34; (2001),他转换,但作为一天或一个月。

如何确保所有内容都转换为原始格式不会改变?我在format=" "尝试过多种变体,但没有任何效果。

1 个答案:

答案 0 :(得分:2)

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