checkboxgroupの入力を使ってRの光沢のあるデータテーブルを作成するにはどうすればよいですか？

Question

• 私はいくつかのサンプルコードを見つけるために、何のグーグルを研究していないが、それが大変だった私は、テーブルの出力

ための複数の変数を選択することができるように入力をcheckboxgroup使用しようとしDTパッケージ

からDataTableを使用しています適用する。

いずれかの専門家が助けることができます！

ありがとうございました！

Answer 1

[]を使用すると、チェックボックスの入力に従ってデータをサブセット化できます。

library(shiny) 

shinyApp(
    fluidPage(
    checkboxGroupInput('checkbox', 'select columns', names(mtcars), inline = TRUE), 
    DT::dataTableOutput('table') 
), 
    function(input, output) 
    output$table <- DT::renderDataTable({ mtcars[input$checkbox] }) 
) 

EDIT：ここで私はコメント

library(shiny) 

shinyApp(
    fluidPage(
    checkboxGroupInput('checkbox', 'select columns', unique(mtcars$gear), 
         unique(mtcars$gear), inline = TRUE), 
    DT::dataTableOutput('table') 
), 
    function(input, output) 
    output$table <- DT::renderDataTable({ 
     subset(mtcars, gear %in% input$checkbox) 
    }) 
)