2013-09-28 24 views
0

我已經使用quantmod向圖表添加了一條線。但是,我怎樣才能在未來的20天內延伸到未來呢?在chartSeries圖上將線延長20天到未來

library(quantmod) 
getSymbols("SPY", from="2013-01-01", to="2013-09-28") 
chartSeries(SPY, TA="addLines(h=c(max(SPY[,c(1:4)])))") 

另外我怎樣才能將它的值添加到次y軸?

我也試過:

chart_Series(SPY, subset="2013::", type = "candlesticks") 
segments(1, 150, 800, 150) 

但我無法改變x軸前進。

+2

請閱讀SO規則,瞭解如何撰寫有用的文章。特別是,請發佈您嘗試過的內容,您希望獲得「未來」數據的位置,以及您的圖表目前的狀況。 –

回答

2

將想要擴展的值放入另一個對象,然後將想要繪製的對象與其他對象的索引合併。這將爲未來的日子創建完整的行數爲NA

futureLine <- xts(,end(SPY)+1:20) # create empty object with days we want 
futureLine$max <- max(Hi(SPY))  # fill in data 
chart_Series(merge(SPY,index(futureLine)), TA="add_TA(futureLine, on=1)") 

常規chartSeries不喜歡這種做法,因爲它似乎刪除僅包含NA的所有行。

+0

錯誤在'索引< - .xts'('* tmp *',value = c(1357084800,1357171200,1357257600,)不受支持'索引'類'POSIXct'的索引類型我嘗試了上面的內容,但我希望得到一個POSTIXct索引錯誤我試過class(index(SPY)),我得到[1]「Date」,所以我不知道該怎麼辦才能修復這個錯誤 –

+0

R版本3.0.2(2013-09-25) Platform:x86_64 -w64-的mingw32/64(64位) 區域設置: [1] = LC_COLLATE English_United Kingdom.1252 [2] = LC_CTYPE English_United Kingdom.1252 [3] = LC_MONETARY English_United Kingdom.1252 [4] LC_NUMERIC = C [5] LC_TIME = English_United Kingdom.1252 附加的基本軟件包: [1]統計圖形grDevices utils的數據集的方法基礎 其他附軟件包: [1] quantmod_0.4-0 TTR_0.22-0 Defaults_1.1-1 xts_0.9-7 zoo_1.7-10 通過加載命名空間(並未附加): [1] grid_3.0.2 lattice_0.20-23 tools_3.0.2 –

+0

我在上面輸入了會話信息。 –