r Shiny Использование столбца фрейма данных для выбора

Question

Я действительно новичок в R, так что это, вероятно, простое и очевидное исправление.

Я пытаюсь создать функцию, которую я могу вызвать для создания полей selectInput, используя имя столбца вфрейм данных с вариантами выбора

Набор данных - это имя фрейма данных, а характеристика - это имя столбца внутри фрейма.Я пытаюсь использовать имя признака в качестве заголовка поля ввода, значения из столбца в качестве параметров раскрывающегося списка и сохраняю входные данные в переменной с именем I (характеристика).

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

Answer 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)