title: r shiny: create column headers with write.table in text file
body: <p>I am writing a simple shiny app, where I use three <code>numericInput</code>s. The user inputs three numbers, and in the server side I use this input to write a <code>.txt</code> file using <code>write.table</code>. In the <code>.txt</code> file I want to create column headers similar to the label of every input, so the first number to be in a column with header 1st Number etc. I thought it was gonna simple, but I am keep not getting the expected result.</p>
  
  <p>My code:</p>
  
  <pre><code>write.table(paste(c(input$firstNum, input$secondNum, input$thirdNum), collapse = " | "),
              filename, quote = FALSE, row.names = TRUE,
              col.names = c("1st Number", "2nd Number", "3rd Number"))
  </code></pre>
  
  <p>Any suggestions?</p>