| mwDateRange {manipulateWidget} | R Documentation |
Add a date range picker to a manipulateWidget gadget
mwDateRange(value = c(Sys.Date(), Sys.Date() + 1), label = NULL, ..., .display = TRUE)
value |
Vector containing two dates (either Date objects pr a string in yyy-mm-dd format) representing the initial date range selected. |
label |
Display label for the control. If |
... |
Other arguments passed to function |
.display |
expression that evaluates to TRUE or FALSE, indicating when the input control should be shown/hidden. |
An Input object
Other controls: mwCheckboxGroup,
mwCheckbox, mwDate,
mwGroup, mwNumeric,
mwPassword, mwRadio,
mwSelectize, mwSelect,
mwSharedValue, mwSlider,
mwText
if (require(dygraphs) && require(xts)) {
mydata <- xts(rnorm(365), order.by = as.Date("2017-01-01") + 0:364)
manipulateWidget(
dygraph(mydata) %>% dyShading(from=period[1], to = period[2], color = "#CCEBD6"),
period = mwDateRange(c("2017-03-01", "2017-04-01"),
min = "2017-01-01", max = "2017-12-31")
)
}