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)
}
})
})