title: Use actionButton to send email in RShiny
body: <p>I'm working on a web app in Shiny. I'm pretty familiar with R but my knowledge of HTML, CSS, jQuery, etc is lacking which makes formatting things nicely challenging. </p>
  
  <p>I want to include an <code>actionButton</code> that the user can click on to send an email to the administrator in case of questions or concerns. Here's what I have so far, which kind of works but is pretty heinous:</p>
  
  <pre><code>library(shiny)
  ui &lt;- shinyUI(fluidPage(
    # Set layout/format for app
    sidebarLayout(
      sidebarPanel(
        downloadButton("download_data", "Download this Data"),
        br(),
        actionButton(inputId = "email1", 
                     icon = icon("envelope", lib = "font-awesome"), 
                     a("Contact Admin", 
                         href="mailto:my_awesome_email_address.com"))
      ),
      mainPanel(),
      position = "left"
    )
  )
  )
  
  server &lt;- shinyServer(function(input, output) {})
  shinyApp(ui, server)
  </code></pre>
  
  <p>If possible, I'd like to keep using the <code>actionButton</code> or something similar in order to keep the same button format across both buttons.</p>
  
  <p>Thanks in advance!</p>