在R /闪亮中取消选择最后一个选项时，如何选择全部？

Question

取消选中checkboxGroupInput中的最后一个选择时，如何全部选择？

我努力了：

if (input$checkboxGroupInput == NULL){

      updateCheckboxGroupInput(session, inputId = "checkboxGroupInput",
                               choices = year,
                               selected = year,
                               inline = TRUE)

    }

但它返回：“警告：观察者中未处理的错误：参数的长度为零”

Answer 1

这不是检查列表元素是否为NULL的正确方法。 您的方式返回logical(0) ，当在if语句中对其求值时，它将抛出您得到的错误。 正确的方法是is.null() ，它返回TRUE或FALSE。

> test <- list(foo=1)
> is.null(test$bar)
[1] TRUE
> test$bar == NULL
logical(0)

您的第一行应该是：

if ( is.null(input$checkboxGroupInput) ) {
  ...
}