如何从ShinyR App中获取从server.R到ui.R中的selectInput的选项向量

问题

我的ui.R文件有一个这样的selectInput：
selectInput("variable1", "Choose Option:", camps)
camps 应该是选择的向量。该向量取决于在服务器脚本上运行的sql查询，并返回 camps 的ID：

server.R

df1 <- getCamps("date")
camps <- unique(df1$idCamps)

当我运行应用程序时，ui.R不知道“camps”是因为它仅在server.R文件中创建。如何将在server.R文件中创建的阵营的向量传递给ui.R文件，以便它们现在可以在selectInput选择器中进行选择？

解决方案

您需要在server.R中创建一个输入对象，并将其作为输出列表的一部分返回到ui.R：
server.R

df1 <- getCamps("date")
camps <- unique(df1$idCamps)
output$campSelector <- renderUI({
   selectInput("variable1", "Choose Option:", as.list(camps)) 
})

ui.R

uiOutput("campSelector")

原文链接

How to get vector of options from server.R to ui.R for selectInput in Shiny R App