блестящий DT datatable - сбросить фильтры - PullRequest
0 голосов
/ 24 апреля 2018

возможно легко, но как-то не получается, как лучше сбросить фильтры в блестящем DT?У меня очень широкая таблица, и я не хочу, чтобы кто-то делал какую-то фильтрацию, забывая, что он отфильтровал другой столбец за пределами ширины экрана - я бы предпочел кнопку для очистки всех фильтров.Является ли замена домика / включение / выключение фильтра единственным способом?Извините, если это дубликат - я проверил архив и не вижу его

фиктивное приложение, чтобы обсудить его

library("shiny")
library("DT")
data(iris)

shinyApp(
  ui = fluidPage( DT::dataTableOutput("tabel")
  ),
  server = function(input,output,session){
      output$tabel <- DT::renderDataTable({datatable(iris, filter="top")})
  }
)

в этом есть всего 5 столбцов, поэтому вы можете нажать x на каждом исбросьте, если есть 50 столбцов, что не так просто - и без прокрутки до нижней части экрана вы не узнаете, находитесь ли вы в фильтре или нет

и что?flip filter = 'none', filter = 'top'?Или какой-нибудь другой лучший способ?

1 Ответ

0 голосов
/ 26 апреля 2018

Хорошо, ответ не был слишком сложным, установите прокси

proxy <-dataTableProxy('tabel')

и привяжите его к кнопке

clearSearch(proxy)

, но он все равно оставляет гадкий x в полях поиска, если выимеет CLEAR = TRUE в определении фильтра, но очищает фильтры и обновляет содержимое, не перезагружая его

...