Shiny: チェックボックスグループのオールオアナッシングセレクター

作成日 2012年11月16日 · 3コメント · ソース: rstudio/shiny

checkboxGroupInputを（オプションで）グループに関連付けられた[すべて選択] / [なしを選択]ボックスがあればいいのにと思います。

ソース

HarlanH

最も参考になるコメント

updateCheckboxGroupInput()これを達成できると思います。例：

myChoices <- letters[1:5]
runApp(list(
  ui = basicPage(
    checkboxGroupInput('foo', 'FOO', myChoices),
    checkboxInput('bar', 'All/None')
  ),
  server = function(input, output, session) {
    observe({
      updateCheckboxGroupInput(
        session, 'foo', choices = myChoices,
        selected = if (input$bar) myChoices
      )
    })
  }
))

yihui 2014年01月11日

👍3

全てのコメント3件

updateCheckboxGroupInput()これを達成できると思います。例：

myChoices <- letters[1:5]
runApp(list(
  ui = basicPage(
    checkboxGroupInput('foo', 'FOO', myChoices),
    checkboxInput('bar', 'All/None')
  ),
  server = function(input, output, session) {
    observe({
      updateCheckboxGroupInput(
        session, 'foo', choices = myChoices,
        selected = if (input$bar) myChoices
      )
    })
  }
))

yihui 2014年01月11日

👍3

これ大好き！エレガントなソリューション！