如何在XTS中索引一分钟的盘中数据？

Question

我已经使用Quantmod处理了每日库存数据。 Quantmod会自动从google / yahoo金融网站下载数据，并自动将日期转换为xts对象作为索引。

           AAPL.Open AAPL.High AAPL.Low AAPL.Close AAPL.Volume AAPL.Adjusted
2014-10-01    100.59    100.69    98.70      99.18    51491300      97.09741
2014-10-02     99.27    100.22    98.04      99.90    47757800      97.80230
2014-10-03     99.44    100.21    99.04      99.62    43469600      97.52818
2014-10-06     99.95    100.65    99.42      99.62    37051200      97.52818
2014-10-07     99.43    100.12    98.73      98.75    42094200      96.67644
2014-10-08     98.76    101.11    98.31     100.80    57404700      98.68340
2014-10-09    101.54    102.38   100.61     101.02    77376500      98.89877

现在，我正在使用一分钟的持续时间的盘中数据（csv格式），并将其转换为六列的数据帧（df）。

      Date     Time Open High  Low Close
1 20150408 09:17:00 7.15 7.15 7.10  7.10
2 20150408 09:18:00 7.15 7.15 7.15  7.15
3 20150408 09:19:00 7.10 7.10 7.10  7.10
4 20150408 09:20:00 7.10 7.10 7.05  7.10
5 20150408 09:21:00 7.10 7.15 7.10  7.10
6 20150408 09:22:00 7.10 7.10 7.05  7.10 

现在如何将这种数据帧转换为时间序列，以便可以将其与默认的quantmod函数（例如Cl（），Op（），OHLC（）等）一起使用。

Answer 1

初级，亲爱的沃森：将日期和时间合并到POSIXct ，使用它。

未经测试，因为您没有提供可重复的数据：

pt <- as.POSIXct(paste(X$Date, X$Time), format="%Y%m%d %H:%M:%S")
N <- xts(X[, -(1:2)], order.by=pt)

这里X是您当前的data.frame， N是一个新的xts对象，该对象由X的数据（减去日期和时间）形成，使用pt作为索引。