View source: R/selectInputDT.R
selectInputDT_UI | R Documentation |
UI part of a DT select input
selectInputDT_UI(id)
id |
|
HTML
Jasper Schelfhout
## Only run this example in interactive R sessions
if(interactive()){
ui <- selectInputDT_UI('id')
data <- data.frame(id = 1:3, name = letters[1:3])
server <- function(input,output, session){
selected = selectInputDT_Server('id', choices = data, selected = data[1,] )
observe({print(selected())})
}
shiny::shinyApp(ui, server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.