limit date range of range slider example

Joseph Damiba · Joseph Damiba · commit 0d78b8624c2d · 2020-03-09T17:41:29.000-04:00
diff --git a/r/2015-07-30-range-slider-selector.Rmd b/r/2015-07-30-range-slider-selector.Rmd
@@ -23,7 +23,7 @@ library(plotly)
 library(quantmod)
 
 # Download some data
-getSymbols(Symbols = c("AAPL", "MSFT"))
+getSymbols(Symbols = c("AAPL", "MSFT"), from = '2018-01-01', to = '2019-01-01')
 
 ds <- data.frame(Date = index(AAPL), AAPL[,6], MSFT[,6])
 
