在 R 的 Shiny 包中创建动态 checkboxGroupInput

Question

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

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 的文档，但不知道如何提供 list/vector 来创建复选框。

请指教。我是一个闪亮的初学者。

谢谢。

巴拉特

Answer 1

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

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

对于choices参数，使用c(unique(df$Well))应该可以。 c() 在所选 "Well" 列中创建唯一值的向量。

在 R 的 Shiny 包中创建动态 checkboxGroupInput

Creating Dynamic checkboxGroupInput in Shiny package in R

user-interface

r

checkboxlist

shiny