Usuń opcję "szukaj", ale pozostaw opcję "kolumny wyszukiwania"

Question

Chciałbym usunąć opcję "wyszukiwanie globalne" z mojej aplikacji, ale pozostaw opcję "wyszukiwanie kolumny". Jakieś pomysły? Próbowałem różnych parametrów, takich jak searching=FALSE, filtering='none' ... Nic z tego nie działa poprawnie.

Mój kod:

server.R:

library("shiny") 
library("DT") 

data(iris) 

shinyServer(function(input, output) { 

    output$tabelka <- DT::renderDataTable({ 

     datatable(iris, filter="top", selection="multiple", escape=FALSE) 

    }) 

}) 

ui.R

library("shiny") 
library("DT") 

shinyUI(fluidPage(

    DT::dataTableOutput("tabelka") 

)) 

I obraz, który pomaga zrozumieć mój problem:

Answer 1

Opcje DT należy przekazać jako listę. Ponadto, za pomocą zmiennej inicjalizacyjnej sDom można określić, w którym miejscu znajdują się elementy sterujące DOM. Standardowa konfiguracja wygląda następująco:

datatable(iris, filter="top", selection="multiple", escape=FALSE, 
     options = list(sDom = '<"top">flrt<"bottom">ip')) 

Składnia jest nieco ekscentryczny, ale w zasadzie powyżej mówi, że opcje K, L, R i T mają być umieszczone w górnej div z I i P opcji dolny div. Więcej szczegółowych objaśnień znajduje się w dokumentacji pod numerem http://legacy.datatables.net/usage/options.

W każdym razie "f" jest opcją "Filtrowanie danych wejściowych" (tzn. Opcja wyszukiwania), a przenosząc "f" do innego elementu div lub pomijając go, możemy poruszać się po lub wyłączać pasek wyszukiwania. Rozwiązaniem problemu może wyglądać następująco:

datatable(iris, filter="top", selection="multiple", escape=FALSE, 
     options = list(sDom = '<"top">lrt<"bottom">ip')) 

Answer 2

Nieco prostsza składnię, dla nikogo innego nadal poszukuje:

datatable(head(iris), options = list(dom = 't'), filter = list(position = "top")) 

Inne opcje. Aby wyświetlić tabelę, używanie DOM = 't':

datatable(head(iris), options = list(dom = 't')) 

do wyświetlenia tabeli i filtra (pole wyszukiwania), ustawienie domyślne:

datatable(head(iris), options = list(dom = 'ft')) 

Źródło:

https://rstudio.github.io/DT/options.html

Answer 3

datatable(iris, filter="top", selection="multiple", escape=FALSE, 
options = list(searching = FALSE))