title: Change renderTable title in shiny?
body: <p>I've managed build a simple shiny app that takes user input from a pre-defined list and passes this input as a vector to a function, then outputs the result of that function (here I've replaced that function with print). </p>
  
  <pre><code>library(shiny)
  library(shinythemes)
  
  server &lt;- function(input, output) {
  
    LIST_OF_STUFF = c("A", "B", "C", "D")
  
    other_select &lt;- function(inputId) {
  
      reactive({
        select_ids &lt;- grep("^select_\\d+$", names(input), value = T)
        other_select_ids &lt;- setdiff(select_ids, inputId)
        purrr::map(other_select_ids, purrr::partial(`[[`, input))
      })
  
    }
  
    render_select &lt;- function(i, label = "Enter selections") {
  
      renderUI({
  
        this_id &lt;- paste0("select_", i) 
        this_input &lt;- isolate(input[[this_id]])
  
        selected_elsewhere &lt;- unlist(other_select(this_id)())
        available_choices &lt;- setdiff(LIST_OF_STUFF, selected_elsewhere)
  
        selectInput(inputId = this_id, label = label, choices = available_choices, 
                    selected = this_input, multiple = TRUE)
      })
  
    }
  
    output$select_1 &lt;- render_select(1)
  
    output$selected_var &lt;- renderTable({ 
      as.data.frame(print(input$select_1))
    })
  
  }
  
  ui &lt;- fluidPage(theme = "united",
                  titlePanel("Title"),
                  mainPanel(img(src = 'testimage.png', align = "right")),
                  uiOutput("select_1"),
                  tableOutput("selected_var"))
  
  shinyApp(ui, server)
  </code></pre>
  
  <p>A few questions: The resulting table has the title "print(input$select_1)" -- how can I customize this? </p>
  
  <p>I'd like to apply a theme to add some color to the app, but it doesn't seem to show up. How can I make the background or header bar colored?</p>
  
  <p>The results table currently prints immediately upon user selection, but I'd like it to wait until the user is finished selecting input. How can I do this?</p>
  
  <p>This is my first time using shiny or making any sort of interactive application, so forgive me if these are trivial questions. Thanks!</p>