Добавление точек в xts plot - PullRequest
Новая
       61

Добавление точек в xts plot

4 голосов
/ 05 сентября 2011

Я думал Добавление точек, легенд и текста к графикам с использованием объектов xts будет иметь ответ на этот вопрос, но, очевидно, нет ... 

require(quantmod)
getSymbols("SAM")
big.red.dot <- zoo(85, as.Date("2011-05-05"))
plot(SAM['2011'])
points(  big.red.dot, col="red", pch=19, cex=5  )

Этот, кажется, прямо из учебника. ?plot.zoo не содержит примеров с point().

1 Ответ

10 голосов
/ 05 сентября 2011

По умолчанию объекты, созданные quantmod::getSymbols, на самом деле относятся к классу xts. Это означает, что ваш big.red.dot должен быть xts объектом: 

big.red.dot <- xts(85, as.Date("2011-05-05"))
plot(SAM['2011'])
points(  big.red.dot, col="red", pch=19, cex=5  )

enter image description here

...