title: Shiny dynamic + filtered dataframe/table output with MySQL connection
body: <p>Basically I'm trying to display a dataframe in R by querying it to MySQL.</p>
  
  <p>I have two filters based on which the values of the dataframe/table will differ. The table is reactive based on the filters chosen by the user.</p>
  
  <p><strong>UI</strong></p>
  
  <pre><code>ui &lt;- fluidPage(fluidRow(
  column(4,radioButtons("Stocks", "Stock Number",
  choices = c(1: 2),selected='1')),
  
  column(4,radioButtons("Funds", "Fund Name",
  choices = list("W" = 1, "L" = 2),selected='1')),
  
  column(4,checkboxGroupInput("Position", "Market Position", 
  choices = c(1:5))),
  
  tableOutput("values")
  )
  </code></pre>
  
  <p><strong>SERVER</strong></p>
  
  <pre><code>server &lt;- function(input, output) 
  {    
   tableValues&lt;-reactive({
   df&lt;-dbSendQuery(mydb,paste0("SELECT STOCKS,FUNDS,POSITION,INVESTMENTS FROM 
   SUMMARY WHERE USERNAME='1223' and STOCKS=",input$Stocks," AND 
   FUNDS='",input$Funds,"' 
   AND POSITION=",input$position,";"))
   return(df)
   })
  
  output$values &lt;- renderTable({
  tableValues()})
  
  }
  </code></pre>
  
  <p>This is what I have now but this doesn't seem to work. Any suggestions on how to display the dataframe/table and  make it reactive based on the filters chosen?</p>
  
  <p>Thanks!</p>