R DTデータテーブルのlengthMenu（Page Length Menu）に値の名前を設定します

Question

R DTパッケージを使用してデータテーブルを作成しています。データの24,48,72,96、またはすべての行を表示するかどうかをユーザーが決定/制御できるようにしたいと考えています。

lengthMenu = c(24,48, 72, 96, -1), 

を-1はすべてのエントリを表しオプションリストに：

これは、簡単に設定することによって行うことができます。

問題は、ユーザーは-1が何を意味するのかわからない可能性があるため、ユーザーに表示されるメニューで「すべて」という文字列として表示するようにしたいと思います。

documentation for lengthMenuを見ることによって、私はこれは

$('#example').dataTable({ 
"lengthMenu": [ [10, 25, 50, -1], [10, 25, 50, "All"] ] 
}); 

を書き込むことによって行うことができることを確認しかし、私はR-言語にそれを翻訳する方法は考えています。 名前付きリスト、ベクトル、配列を使ってみましたが、うまくいきませんでした。すべてのヘルプは大歓迎されます

library(shiny) 
library(DT) 

ui <- fluidPage(
    DT::dataTableOutput("table") 
) 

server <- function(input, output) { 
    output$table <- DT::renderDataTable({ 
    DT::datatable(iris, options = list(pageLength = 24, 
        lengthMenu = c(24,48, 72, 96, -1), paging = T)) 
    }) 
} 

shinyApp(ui, server) 

：

以下は簡単な例です！

ありがとうございました

Answer 1

これは行う必要があります。詳細については、shiny-examples/018-datatable-options/

library(shiny) 
library(DT) 

ui <- fluidPage(
    DT::dataTableOutput("table") 
) 

server <- function(input, output) { 
    output$table <- DT::renderDataTable({ 
    DT::datatable(iris, options = list(pageLength = 24,lengthMenu = list(c(24,48, 72, 96, -1), list('24', '48', '72','96', 'All')), paging = T)) 
    }) 
} 

shinyApp(ui, server)