title: RShiny print current page
body: <p>How can I print the current page in R shiny web applications? It is possible in HTML by using the command of window.print();. But I could not find and implement its correspondent R Shiny command. What is on my mind is something like the following? How can I call an html command in SERVER?</p>
  
  <pre><code>actionButton("print", "PRINT")
  
  server &lt;- function(input, output) {
  
          observeEvent(input$print, {
            window.print();
          })
  }
  </code></pre>