title: Create a data frame using text input in Shiny
body: <p>Trying to create a data frame like below;<br/></p>
  
  <pre><code>X   Y
  20  30
  </code></pre>
  
  <p>Using textInput to create data frame.<br/>
  But values entered in text area are not assigning properly to data frame.<br/></p>
  
  <p>Could you please help me?</p>
  
  <p>ui.R</p>
  
  <pre><code>library(shiny)
  shinyUI(pageWithSidebar(
    headerPanel( "", ""),
    sidebarPanel(
  
      wellPanel(
        textInput('datavalues', "variable values",""),
        actionButton("submit","Apply")
  
      )
    ),
  
    mainPanel(   
      verbatimTextOutput('datatable')
    )
  ))
  </code></pre>
  
  <p>server.R</p>
  
  <pre><code>library(shiny)
  shinyServer(function(input,output,session){
  
    data1= reactive({
      if(input$submit!=0){
        isolate({
          data.frame(paste(input$datavalues))
        })
      }
    })
  
    output$datatable&lt;-renderPrint(function(){
      if(!is.null(data1())){
        d&lt;-data1()
        print(d)
      }
    })
  
  
  })
  </code></pre>