在R中的Shiny包中创建Dynamic checkboxGroupInput

Question

我需要使用来自后端（Excel或数据库）动态检索的数据框中的checkBoxGroupInput创建一组复选框。我可以从数据框中检索所需的列向量，并使用以下代码段将其显示为“动态”下拉列表：

library(shiny)
library(ggtern)
library(scales)

setwd("~/R/data")
library(XLConnect)
df <- readWorksheetFromFile("ternary_diagram_all.xlsx",sheet=1,startRow = 1, endCol=7)


ui <- shinyUI(fluidPage(
  wellPanel(
     titlePanel("VGLab Ternary Diagrams"),
     selectInput('wellName', 'Select Well', unique(df$Well))
  ),

我想将df数据框的Well列的唯一值转换为在客户端上呈现的一组复选框。我查找了checkboxGroupInput的文档，但不知道如何提供用于创建复选框的列表/向量。

请指教。我是一个有光泽的初学者。

感谢。

巴勒特

Answer 1

我想你在文档中看到了这个：

checkboxGroupInput(inputId, label, choices, selected = NULL, inline = FALSE, width = NULL)

对于choices参数，使用c(unique(df$Well))应该这样做。 c()在所选的“井”列中创建唯一值的向量。