我正在尝试从动物园文件中提取单独文件中的日期 - 特别是交易日日期而不是标准日历日期。我从雅虎财经下载了一系列文章:
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" ...
是否有一种更好的方法来提取交易日日期,比如在其他地方创建图表?非常感谢!
答案 0 :(得分:1)
zoo
具有获取索引的功能:
dates <- index(vti)
> class(dates)
[1] "Date"