mwSelect {manipulateWidget} | R Documentation |
Add a Select list input to a manipulateWidget gadget
mwSelect(choices = value, value = NULL, label = NULL, ..., multiple = FALSE, .display = TRUE)
choices |
Vector or list of choices. If it is named, then the names rather than the values are displayed to the user. |
value |
Initial value of the input. If not specified, the first choice is used. |
label |
Display label for the control. If |
... |
Other arguments passed to function |
multiple |
Is selection of multiple items allowed? |
.display |
expression that evaluates to TRUE or FALSE, indicating when the input control should be shown/hidden. |
A function that will generate the input control.
Other controls: mwCheckboxGroup
,
mwCheckbox
, mwDateRange
,
mwDate
, mwGroup
,
mwNumeric
, mwPassword
,
mwRadio
, mwSelectize
,
mwSharedValue
, mwSlider
,
mwText
if (require(plotly)) { mydata <- data.frame(x = 1:100, y = rnorm(100)) manipulateWidget( { mode <- switch(type, points = "markers", lines = "lines", both = "markers+lines") plot_ly(mydata, x=~x, y=~y, type = "scatter", mode = mode) }, type = mwSelect(c("points", "lines", "both")) ) Sys.sleep(0.5) # Select multiple values manipulateWidget( { if (length(species) == 0) mydata <- iris else mydata <- iris[iris$Species %in% species,] plot_ly(mydata, x = ~Sepal.Length, y = ~Sepal.Width, color = ~droplevels(Species), type = "scatter", mode = "markers") }, species = mwSelect(levels(iris$Species), multiple = TRUE) ) }