Добавление точек в сюжет XTS
Вопрос
я думал Добавление точек, легенд и текста на участки с использованием объектов 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()
хотя.
Решение
По умолчанию объекты, созданные 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 )
Не связан с StackOverflow