问题
我的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