r - DT パッケージを使用してレスポンシブ データ テーブルの特定の列を非表示にする

Question

DTパッケージを使用して、光沢のあるアプリケーションのレスポンシブ データ テーブルを作成しようとしています。特定の列を事前に非表示にしたい。例えば：

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

この出力により、5 つの列が得られます。ページを狭めたときにのみ列が非表示になります。しかし、最後の3列を事前に非表示にしたいのですが、毎回最初の2列だけを見たいのです。それを行う方法はありますか？

アップデート：

出力例