r Shiny 使用数据框列进行选择答案

【问题标题】：r Shiny Using data frame column for choicesr Shiny 使用数据框列进行选择
【发布时间】：2019-06-22 05:04:48
【问题描述】：

我真的是 R 新手，所以这可能是一个简单而明显的解决方法。

我正在尝试创建一个函数，我可以调用该函数来使用数据框中列的名称创建 selectInput 框，其中的选项是

Dataset 是数据框的名称，而特征是数据框内的列的名称。我正在尝试使用特征名称作为输入框的标题，列中的值作为下拉框选项，并将输入存储在名为 I(characteristic) 的变量中。

NewCharacterBox <- function(Characteristic, Dataset)
  fluidRow(
    column(3,
           selectInput(paste("I", toString(Characteristic), sep = ""), h5(toString(Characteristic)),
                       choices = Dataset$Characteristic

【问题讨论】：

所以你想要带有数据框所有列名的复选框？是这样吗？

标签： r shiny

【解决方案1】：

如果我理解正确，您可能不需要新的用户定义函数，而只需使用names(dataset)。下面是一个例子。

library(shiny)

data = iris

ui = fluidPage(

  selectInput("choice","List of Columns", 
              choices = names(data),
              selected = NULL),
  textOutput("selected"),
  tableOutput("result")
)


server = function(input, output) {

  output$selected <- renderText({
    paste("You have selected", input$choice)
  })

  output$result <- renderTable({
    data[,input$choice]
  })
}




shinyApp(ui,server)

【讨论】：