У меня есть вопрос относительно chartSeries
и addTA
/points.default
функции в R
. Я пытаюсь добавить дополнительную диаграмму ниже chartSeries
-площадь с точками в разных цветах (раскраска взята из функции и работает с points.default
), но, к сожалению, я не могу добавить эти очки с addTA
. Я могу добавить строку в существующие диаграммы (и не то, что я ищу). Функция points.default
просто добавляет эти точки в chartSeries, что не то, что я ищу. Я ищу простую прямую линию точек, которую я могу покрасить по-разному с моим color_fct
и который добавлен ниже моего chartSeries
. Я ценю любую помощь и благодарю вас заранее!R chartSeries добавить дополнительную таблицу с точками
Пример кода:
getSymbols("YHOO")
data <- YHOO
chartSeries(data, type = c("auto", "candlesticks", "matchsticks","bars","line"))
hero<-rep(1,length(data$Close))
c(data, xts(hero))
#addTA provides me with a straight line and the coloring fct is not working
plot(addTA(data$hero,pch = 15,cex = 1.5, on = 2, col = color_fct))
#points.default provides me with perfect coloring, but the points are plotted in the middle of the chart
help<- rep(1, length(data$Close))
points.default(x=(1:length(data$High)),y=help+1, col= color_fct,pch = 15,cex = 1.5)
К сожалению, я нашел ошибку. Я использую блестящий слайдер. Ползунок отлично работает на «chart_Series», но имеет проблему с прямой. Каждый раз, когда я масштабирую его, он фиксирует значения с левой стороны. Если я увеличиваю с правой стороны, значения с левой стороны остаются, в то время как «chart_Series» увеличивает масштаб с правой стороны. Есть ли опция, позволяющая масштабировать «zoom_chart» в ваш ответ? – Simon
Насколько я понял ваш код, он добавляет отдельный график, независимо от chart_Series. Правильное ли это предположение? Есть ли способ подключить обе диаграммы? – Simon
Вы можете нарисовать все элементы вместе с этим при использовании Shiny: 'chart_Series (данные [" 2017 "], TA = 'add_TA (x_ti, col =" фиолетовый ", pch = 15, type =" p ", cex = .7) add_TA (x_ti2, col = "orange", pch = 9, type = "p", cex = .7) ') ' – FXQuantTrader