Xts转换错误（不匹配对象的长度）

Question

我正在将一个 csv 文件导入 R，创建一个 3x3 数据框，并尝试将该数据框转换为一个 xts 对象。但我收到错误消息 "do not match the length of object"。

#DATSB <- fread("C:/Temp/GoogleDrive/R/temp.csv", select = c("DateTime","Last","Volume"))
#that results in following dput() output:
DATSB <- structure(list(DateTime = c("3/28/2016 20:37", "3/28/2016 20:36","3/28/2016 20:35"), Last = c(1221.7, 1221.8, 1221.9), Volume = c(14L,2L, 22L)), .Names = c("DateTime", "Last", "Volume"), row.names = c(NA,3L), class = "data.frame")

setDF(DATSB)
DATSB$DateTime <- strptime(DATSB$DateTime, format = "%m/%d/%Y %H:%M") 
DATSBxts <- as.xts(DATSB[, -2], order.by = as.Date(DATSB$DateTime, "%Y/%m/%d %H:%M"))

     DateTime     Last     Volume
1 3/28/2016 20:37 1221.7     14
2 3/28/2016 20:36 1221.8      2
3 3/28/2016 20:35 1221.9     22

确切的错误消息是“as.matrix.data.frame(x) 中的错误： dims [产品 12] 与对象 [14] 的长度不匹配

不知何故，问题的根源在于列 Volume。没有那个专栏，它就可以工作。不幸的是无法弄清楚。感谢您的帮助！

Answer 1

此处有错别字 DATSB[, -2]，更正后效果很好。 xts 的一般主题是

xts(data[,-date_column], order.by = data[,date_column])

另外 coredata(DATSBxts) 和 index(DATSBxts) 也是有用的函数

DATSBxts  = xts(DATSB[, -1], order.by = DATSB[,1] ,dateFormat = "%Y/%m/%d %H:%M:%S");rev(DATSBxts)


DATSBxts
#                  Last Volume
#2016-03-28 20:35:00 1221.9     22
#2016-03-28 20:36:00 1221.8      2
#2016-03-28 20:37:00 1221.7     14

Xts转换错误（不匹配对象的长度）

Xts conversion error (do not match the length of object)

r

xts