使用InputSelect的输入子集空间数据框

Question

我正在尝试使用来自InputSelect的输入在闪亮的应用程序中对空间数据框进行子集化。

1. 在应用程序之外，这是有效的：

   SDF2 <- SDF1%>% subset(VAR >200)
   

2. 在闪亮的应用程序中，这不起作用=＆gt;

- 在UI中：

  selectInput("choice", "", choices = "VAR" )

- 在服务器：

   InputVar<-input$choice
   SDF2 <- SDF1 %>% subset(InputVar >200)

为什么1个有效，2个没有？

任何提示都会非常感激！