R блестящий, удалите фильтры внутри столбца из DataTables

[также опубликовано в блестящей группе Google]

я сталкиваюсь с некоторым (я считаю) неожиданным поведением, когда я пытаюсь отобразить dataTable. Когда я показываю таблицу, моя цель-удалить большинство параметров сортировки/разбиения на страницы/фильтра/обработки. До сих пор установка bSort=0, bProcessing=0, bPaginate=0, bInfo=0, по-видимому, дает желаемые результаты. Однако, когда я устанавливаю bFilter=0, удаляется только" глобальный " фильтр в правом верхнем углу; фильтры внутри столбца остаемся (я ожидал, что bFilter=0 удалит все коробки фильтров).

может ли кто-нибудь помочь с кодом удалить коробки фильтров внутри столбца (пожалуйста, и спасибо). [Кроме того, мне известны параметры формата для конкретных столбцов, но до сих пор не удалось успешно реализовать их для устранения форматов внутри столбцов]. Я включил минимальный код ниже, чтобы воспроизвести проблему:

shinyUI(pageWithSidebar(

  #my code has a header panel;
  headerPanel("Table Example"),

  #my code has a sidebar panel;
  sidebarPanel(helpText("Stuff Here")),

  #table is displayed in the main panel;
  mainPanel(dataTableOutput("myTable"))
))


shinyServer(function(input, output) {

  #example dataTable that produces undesired result;
  output$myTable <- renderDataTable({
    as.data.frame(matrix(sample(1:10,100,replace=TRUE),nrow=20,ncol=10))
  }, options = list(bFilter=0, bSort=0, bProcessing=0, bPaginate=0, bInfo=0))

})

[поведение отображается как запущенное с сервера, так и локально. Блестящий 0.7.0.99. использовать Google Chrome]

заранее спасибо!

8
datatables r shiny

1 ответов

решение состояло в том, чтобы просто отредактировать css, связанный с объектом вывода myTable:

т. е. изменение:

mainPanel(dataTableOutput("myTable"))

to 

mainPanel(
  dataTableOutput("myTable"),
  tags$style(type="text/css", '#myTable tfoot {display:none;}')
)
7