title: How can I link my selectInput to my DataTable to update the table based on the selections? (this is R Shiny)
body: <p>Specifically, I'm using pickerInput (which is similar to selectInput), and a renderDataTable.</p>
  <p>Here is what the app looks like (you can see where I'm trying to have the filter update the datatable - if i select 'setosa' the table should update to include just setosa rows):
  <a href="https://i.stack.imgur.com/XFqfV.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/XFqfV.png" alt="enter image description here" /></a></p>
  <p>Here is my minimally reproducible code:</p>
  <pre><code>library(shiny)
  library(data.table)
  
  results &lt;- iris
  results$Species &lt;- as.character(results$Species)
  
  # UI
  ui &lt;- fluidPage(
      
      # Application title
      titlePanel(
          h1(&quot;Iris Table&quot;, align=&quot;center&quot;)
      ),
      
      fluidRow(
          column(3,
                 pickerInput(&quot;speciesInput&quot;, &quot;Species&quot;, choices=unique(results$Species), options = list(`actions-box` = TRUE), selected=NULL, multiple=TRUE)
          ),
          column(9, 
                 DT::dataTableOutput('table')))
      
  )
  
  # Server
  server &lt;- function(input, output) {
      
      
      output$table &lt;- DT::renderDataTable(
          DT::datatable(#filter='top',
              escape = FALSE,
              iris
          ))
      
  }
  
  # Run the application 
  shinyApp(ui = ui, server = server)
  </code></pre>