## In ui.R
## Create a dropdown
bsNavDropDown(inputId = "dd1", label = "Distribution",
choices = c("Normal", "Lognormal", "Gamma"),
selected = "Normal")
## In server.R
## Add another distribution to the list
updateDropDown("dd1" choices = c("Normal", "Lognormal", "Gamma", "Exponential"))
Run the code above in your browser using DataLab