R/get_selected_data.R
get_selected_data_boundary.Rd
This function is used to the boundary points of data selected in excel table
get_selected_data_boundary(excelObj)
excelObj | the json data retuned from excel table |
---|
if(interactive()){ library(shiny) library(excelR) shinyApp( ui = fluidPage(excelOutput("table")), server = function(input, output, session) { output$table <- renderExcel(excelTable(data = head(iris), getSelectedData = TRUE)) observeEvent(input$table,{ print(get_selected_data_boundary(input$table)) }) } ) }