Я добавил линию на график с помощью 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 вперед.
Поместите значение, которое вы хотите расширить, в другой объект, затем объедините объект, который вы хотите отобразить, с индексом другого объекта. Это создаст строки, заполненные 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.
index<-.xts(*tmp*, значение = c(1357084800, 1357171200, 1357257600,: неподдерживаемый тип индекса 'index' класса 'POSIXct'. Я пробовал вышеописанное, но все равно получаю ошибку индекса POSTIXct. Я пробовал class(index(SPY)) и я получаю [1] Date, поэтому я не уверен, что делать, чтобы исправить эту ошибку 29.09.2013