使用 getSymbols.csv 读取日内数据

Question

我安装了 quantmod 包，我正在尝试导入一个包含 1 分钟日内数据的 csv 文件。这是一个示例 GAZP.csv 文件:

"D";"T";"Open";"High";"Low";"Close";"Vol"
20130902;100100;132.2000000;133.0500000;131.9200000;132.5000000;131760
20130902;100200;132.3700000;132.5700000;132.2500000;132.2900000;66090
20130902;100300;132.3600000;132.5000000;132.2600000;132.4700000;37500

我试过了:

> getSymbols('GAZP',src='csv')
Error in `colnames<-`(`*tmp*`, value = c("GAZP.Open", "GAZP.High", "GAZP.Low", : 
  length of 'dimnames' [2] not equal to array extent
> getSymbols.csv('GAZP',src='csv')
> # or
> getSymbols.csv('GAZP',env,dir="c:\\!!",extension="csv")
Error in missing(verbose) : 'missing' can only be used for arguments

我应该如何正确使用 getSymbols.csv命令读取此类数据？

Answer 1

@Vladimir，如果您不坚持使用 quantmod 包中的“getSymbols”函数，您可以导入您的 csv 文件 - 假设它在您的工作目录中 - 作为带有以下行的动物园对象:

GAZP=read.zoo("GAZP.csv",sep=";",header=TRUE,index.column=list(1,2),FUN = function(D,T) as.POSIXct(paste(D, T), format="%Y%m%d %H%M%S"))

并根据需要将其转换为 xts 对象。

GAZP.xts <- as.xts(GAZP)

> GAZP
                      Open   High    Low  Close    Vol
2013-09-02 10:01:00 132.20 133.05 131.92 132.50 131760
2013-09-02 10:02:00 132.37 132.57 132.25 132.29  66090
2013-09-02 10:03:00 132.36 132.50 132.26 132.47  37500