如何从动物园的2栏中读取日期时间？

Question

我有一个CSV文件包含分钟汇率

<TICKER>,<DTYYYYMMDD>,<TIME>,<OPEN>,<HIGH>,<LOW>,<CLOSE>,<VOL> 
EURUSD,20110103,000000,1.3353,1.3354,1.3353,1.3354,4 
EURUSD,20110103,000100,1.3355,1.3356,1.3355,1.3356,4 
EURUSD,20110103,000200,1.3355,1.3356,1.3350,1.3350,4 
EURUSD,20110103,000300,1.3349,1.3349,1.3348,1.3348,4 
EURUSD,20110103,000400,1.3347,1.3348,1.3347,1.3348,4 
... 

尝试做以下，但不适合我的工作。如何从2列读取日期时间？

rate <- read.zoo("data.csv",sep=",",tz="",header=T, format='%Y%m%d %H%M%S', index = 2:3) 

上面的代码生成的错误：index has 5 bad entries at data rows: 1 2 3 4 5

Answer 1

你需要指定colClasses保持前导零的第三列，并删除第一列（因为你不能同时拥有数字和字符一个动物园对象）。请注意，如果指定了多个索引列，则默认操作是将它们粘贴在一起，并在它们之间留出空格。

Lines <- "<TICKER>,<DTYYYYMMDD>,<TIME>,<OPEN>,<HIGH>,<LOW>,<CLOSE>,<VOL> 
EURUSD,20110103,000000,1.3353,1.3354,1.3353,1.3354,4 
EURUSD,20110103,000100,1.3355,1.3356,1.3355,1.3356,4 
EURUSD,20110103,000200,1.3355,1.3356,1.3350,1.3350,4 
EURUSD,20110103,000300,1.3349,1.3349,1.3348,1.3348,4 
EURUSD,20110103,000400,1.3347,1.3348,1.3347,1.3348,4 
" 

rate <- read.zoo(text=Lines, sep=",", header=TRUE, 
    index.column=1:2, format="%Y%m%d %H%M%S", tz="", 
    colClasses = rep(c("NULL", "character", "numeric"), c(1, 2, 5))) 

MODIFIED：Simplified。