0

quantmod を使用してチャートに線を追加しました。しかし、次の 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軸を前方に変更できませんでした。

4

1 に答える 1

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。

于 2013-09-29T12:36:20.600 に答える