如何从复选框组输入中打印选定的值以在 R Shiny 中进行调试？答案

【问题标题】：How to print the selected values from a checkboxGroupInput for debugging purpose in R Shiny?如何从复选框组输入中打印选定的值以在 R Shiny 中进行调试？
【发布时间】：2015-04-20 14:58:42
【问题描述】：

我正在尝试创建一个应用程序，其最终目标是选择满足用户使用闪亮元素选择的某些条件的矩阵行(checkboxGroupInput, sliderInput, etc) 出于示例目的，让我们将数据视为 global.R 文件的一部分：

global.R

data <- t(combn(20, 5))  # 20 has been chosen for simplicity. In reality is a variable selected from c(20, 30, 45).

在ui.R 和server.R 中，我创建了一组checkboxGroupInput 来反映c(1:20) 的范围，用户可以从中选择一些数字。

ui.R

....
uiOutput(outputId = "numSelector")
....

服务器.R

     ....... 
     output$numSelector <- renderUI({
        out <- checkboxGroupInput(
            inputId = "numSelector",
            label   = "Select the numbers",
            choices = selectRange(input$dataName),
            inline = TRUE
        )
        return(out)
    })
   ........

出于调试目的，我想通过checkboxGroupInput（实际上是任何其他闪亮元素）打印出选定的值，并根据这些值过滤data 的行。有什么建议吗？

【问题讨论】：

标签： r shiny

【解决方案1】：

使用上面的代码，您可以调用使用input$numSelector 选择的值的向量。这些可以传递给数据框进行过滤，或传递给任何其他闪亮的输出对象。

打印值：

print(input$numSelector)

过滤器

data[data$dataName %in% input$numSelector,]

要运行此打印代码，需要将其放置在一个 observe() 函数中。

【讨论】：

我添加了以下selectedValues <- reactive({ print("Numbers selected via checkboxes:") print(input$numSelector) }) ，我想在 R 环境中而不是在浏览器中打印它。有什么想法吗？
observe({ print(input$numSelector) }) 在您的 Server.R 中应该可以工作，编辑以上内容以反映
谢谢！您可能希望通过添加您在 cmets 中的内容来编辑您的答案，以便对答案进行四舍五入。