从R Shiny中的选定输入过滤

问题描述

尝试根据选定的输入过滤数据库时，我总是遇到错误。我根据虹膜数据集制作了一个非常简单的示例，向大家展示了我的问题：

    ```{r}
    library(flexdashboard)
    library(tidyverse)
    ```
    
    Sidebar {.sidebar}
    =====================================
    
    ```{r}
    
    fluidRow(
      column(7,selectInput("Species","Choose a species",choices = c("setosa","versicolor","virginica"))))
    
    mydata <- reactive({
    iris %>% filter(Species == input$Species)
    })
    
    ```
    
    Results
    ===================================== 
    
    ```{r}
    head(mydata)
    ```

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）