Erstellen Sie einen Datenrahmen mithilfe der Texteingabe in Shiny

Der Versuch, einen Datenrahmen wie unten zu erstellen;

X   Y
20  30

Verwenden von textInput zum Erstellen eines Datenrahmens.
Im Textbereich eingegebene Werte werden dem Datenrahmen jedoch nicht ordnungsgemäß zugewiesen.

Kannst du mir bitte Helfen?

ui.R

library(shiny)
shinyUI(pageWithSidebar(
  headerPanel( "", ""),
  sidebarPanel(

    wellPanel(
      textInput('datavalues', "variable values",""),
      actionButton("submit","Apply")

    )
  ),

  mainPanel(   
    verbatimTextOutput('datatable')
  )
))

server.R

library(shiny)
shinyServer(function(input,output,session){

  data1= reactive({
    if(input$submit!=0){
      isolate({
        data.frame(paste(input$datavalues))
      })
    }
  })

  output$datatable<-renderPrint(function(){
    if(!is.null(data1())){
      d<-data1()
      print(d)
    }
  })


})

Antworten auf die Frage(1)

Ihre Antwort auf die Frage