引用列名-R

我正在构建一个R闪亮的应用程序，我似乎被一个小问题所困扰。但我尝试过各种选择，但似乎没有一个可行

本质上，该应用程序将帮助用户从下拉列表中进行选择。下拉列表中的每个值对应于我的数据帧中的特定列。 根据所选值，将显示一个绘图，描述所选变量和输出变量之间的关系

我的代码的Ui端如下所示：

tabPanel("Descriptive Analysis",
     sidebarPanel(
     selectInput("InputVar", label ="Select Predictor", list("Predictor1" = "Pred1","Predictor2" = "Pred2"))
     ),
    mainPanel(
    plotOutput('DescAnalysis')
    ))

“Pred1”和“Pred2”是我的数据帧中的列名

现在，在服务器端，我有以下代码：

output$DescAnalysis<-renderPlot({
Var<-input$InputVar
tbl<-table(df$Var,df$Output)
mosaicplot(tbl)

})

---

output$descanalysis它应该是
df[[Var]]
而不是
df$Var
。非常感谢！！它起作用了