You use CSS with a search
selector disabled to hide them.
Here is an example in a brilliant application:
library(shiny) shinyApp( ui = fluidPage(tags$head(tags$style( HTML("input[type='search']:disabled {visibility:hidden}") )), DT::dataTableOutput('tbl')), server = function(input, output) { iris2 = head(iris, 10) output$tbl = DT::renderDataTable(datatable( iris2, filter = 'top', options = list(columnDefs = list(list( targets = c(1, 3), searchable = FALSE )), pageLength = 5) )) } )
source share