Скрыть определенные столбцы в гибкой таблице данных с помощью пакета DT

Я пытаюсь создать гибкую таблицу данных для своего блестящего приложения с помощью пакета DT. Я хочу скрыть определенные столбцы заранее. Например:

library("shiny")
library("DT")
shinyApp(
  ui = fluidPage(DT::dataTableOutput('tbl')),
  server = function(input, output) {
    output$tbl = DT::renderDataTable(
      iris,extensions="Responsive"
    )
  }
)

Этот вывод дает мне 5 столбцов. Он только скрывает столбцы, когда я сужу страницу. Но я хочу скрыть последние 3 столбца заранее, и я просто хочу видеть первые два столбца каждый раз. Есть ли способ сделать это?

Update:

Пример вывода

введите описание изображения здесь

Ответы

Ответ 1

Скрыть столбцы в таблице можно с помощью опций или расширений DT.

Если вы хотите, чтобы они были скрыты заранее, но у вас есть кнопка, чтобы сделать их видимыми снова, расширение ColVis должно хорошо работать для вас: ссылка

Если вы просто хотите, чтобы скрытый текст остался скрытым, добавьте следующий параметр (не помню, где я видел его документацию прямо сейчас.)

options=list(columnDefs = list(list(visible=FALSE, targets=columns2hide)))