我正在尝试从动物园文件中提取单独文件中的日期 - 特别是交易日日期而不是标准日历日日期。我从雅虎财经下载了一个系列:
vti <-get.hist.quote(instrument="vti",start="2012-12-31",quote="AdjClose")
结果文件:
> head(vti)
AdjClose
2012-12-31 72.95
2013-01-02 74.80
2013-01-03 74.69
2013-01-04 75.07
2013-01-07 74.87
2013-01-08 74.67
这似乎有效:
> dates <-(vti[,0])
但是生成的文件并不容易使用。这是生成的“日期”文件的结构:
> str(dates)
‘zoo’ series from 2012-12-31 to 2013-04-26
Data: num[1:81, 0 ]
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : NULL
Index: Date[1:81], format: "2012-12-31" "2013-01-02" "2013-01-03" ...
是否有更好的方法来提取交易日日期,例如,在其他地方使用创建图表?非常感谢!