如何從安全價格的動物園文件中提取單獨文件中的日期？

Question

我試圖從動物園文件中提取單獨文件中的日期 - 具體地說，是交易日日期而不是標準日曆日期日期。我下載從雅虎財經的一系列這樣：

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" ... 

是否有提取交易日日期，比如說，在創建圖形使用在其他地方優越的方法是什麼？非常感謝！

Answer 1

zoo有一個函數來獲取指數：

dates <- index(vti) 
> class(dates) 
[1] "Date"