hc_add_series_flags {highcharter} | R Documentation |
This function helps to add flags highstock charts created from xts
objects.
hc_add_series_flags(hc, dates, title = LETTERS[seq(length(dates))], text = title, id = NULL, ...)
hc |
A |
dates |
Date vector. |
title |
A character vector with titles. |
text |
A character vector with the description. |
id |
The name of the series to add the flags. A previous series
must be added whith this |
... |
Aditional shared arguments for the *flags* data series (http://api.highcharts.com/highstock#plotOptions.flags) |
## Not run: library("quantmod") usdjpy <- getSymbols("USD/JPY", src="oanda", auto.assign = FALSE) dates <- as.Date(c("2015-05-08", "2015-09-12"), format = "%Y-%m-%d") highchart(type = "stock") %>% hc_add_series_xts(usdjpy, id = "usdjpy") %>% hc_add_series_flags(dates, title = c("E1", "E2"), text = c("This is event 1", "This is the event 2"), id = "usdjpy") ## End(Not run)