Постройте 2 временных ряда xts на одном графике

Привет, я думал, что это будет простая задача, спустя 2 часа, и я все еще борюсь. Я смог с этим кодом

chartSeries(snp.obj, TA=c("addTA(over,layout=NULL)"))

Однако он поставляется с 2-панельным графиком, но я ищу эти два объекта xts, наложенные на разные оси Y, чтобы они были на одном графике, а не на графике chartSeries.

Ответ, который работает, но, возможно, не так элегантен:

over = xts(over, order.by=snp.obj[121:1730])
plot(snp.obj, main='Shiller PE Timer')
lines(2000*over+1, col= 'red')`

r plot quantmod xts
person Mickson    schedule 19.05.2014    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Используйте аргумент on= для addTA (см. ?addTA)

chartSeries(snp.obj, TA=c("addTA(over, on=1)"))
person GSee    schedule 26.05.2014