customButton | R Documentation |
eDT
Generate a custom button for eDT
customButton(id, label, icon = "", disabled = FALSE)
id |
|
label |
|
icon |
|
disabled |
|
Combines elements of shiny::actionButton
and datatable options
list to be used in eDT(options = list(buttons = xxx))
Jasper Schelfhout
if(interactive()){
ui <- eDTOutput("data")
server <- function(input,output,session){
b <- customButton('print', label = 'print')
eDT_result <- eDT(id = "data", mtcars, options = list(buttons = list("save", b)))
observeEvent(input$print,{
print(eDT_result$state())
})
}
shinyApp(ui,server)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.