0
例如,复制运行:Plotly时间序列中的垂直范围滑块?
library(plotly)
library(quantmod)
setDefaults(getSymbols,src='google')
getSymbols('AAPL',from="2010-01-01",to=Sys.Date())
df <- data.frame(Date = index(AAPL), coredata(AAPL))
colnames(df)
p <- df %>%
plot_ly(x = ~Date, type="candlestick",
open = ~AAPL.Open, close = ~AAPL.Close,
high = ~AAPL.High, low = ~AAPL.Low) %>%
layout(title = "Basic Candlestick Chart")
p
现在这个情节没有垂直滑块/范围选择像plotly散点图做(说在价格和时间范围放大,而不仅仅是一个时间范围如现在)。如何添加一个?