2016-04-11 8 views
1

Ich versuche, integrierte Programme (Beispiele) mit glänzenden (durch runExample() -Methode) und die folgenden Fehler zu erhalten. Shiny eingebaute Programme werfen Fehler

Fehler im Ausgang $ DynamicAssets < -. RenderUI ({Argument "Ausgang" fehlt, ohne Standard

Dieser Fehler auch mit anderen Programmen auftritt für eine Instanz, dann ist dies der Code Festhalten der Details werden vom Anwender eingegeben:

ui.R

library(shiny) 
shinyUI(fluidPage(
    titlePanel("Enter Personal Details"), 
    sidebarLayout(
    sidebarPanel(("Enter the personal Details"), 
       textInput("name","Enter your name", ""), 
       textInput("age","Enter your age","") 
       ), 
    mainPanel(("Your Entered information is : "), 
       textOutput("myname"), 
       textOutput("myage") 
      ) 
    ) 
) 
) 

server.R

library(shiny) 
shinyServer(
    function(input,output){ 
    output$myname= renderText(input$name) 
    output$myage=renderText(input$age) 

    } 
) 

noch seine denselben Fehler zeigt ... bearbeitet: Output-> Ausgabe

+0

Wenn Sie es richtig verstanden haben, versuchen Sie, Beispiele auszuführen? Die richtige Art, sie auszuführen, ist: 'library (shiny) runExample (" 01_hello ")' –

+0

ya das ist korrekt Ich versuche Beispiele auszuführen, Ja ich habe eine Bibliothek hinzugefügt, aber ich erhalte immer noch eine nicht reagierende Webanzeige (mit grauem Fenster) ist in der Regel der Fall, wenn App beendet wird) zusammen mit dem Fehler, wie bereits erwähnt. @MikaelJumppanen – Mayur

+0

Verwenden Sie keine Großbuchstaben in 'Output $ myname' und versuchen Sie' output $ myname <- renderText (Eingabe $ name) ' –

Antwort

0

Dieser Code sollte funktionieren:

library(shiny) 
server <- function(input, output) { 
    output$myname <- renderText(input$name) 
    output$myage <- renderText(input$age) 


} 

ui <- fluidPage(titlePanel("Enter Personal Details"), 
       sidebarLayout(
        sidebarPanel(("Enter the personal Details"), 
           textInput("name", "Enter your name", ""), 
           textInput("age", "Enter your age", "") 
       ), 
        mainPanel(("Your Entered information is : "), 
          textOutput("myname"), 
          textOutput("myage") 
       ) 
       )) 

shinyApp(ui = ui, server = server)  

Wenn es nicht funktioniert Problem irgendwo anders ist als in ein Code.

+0

Ja .. Seine Arbeit ............ Danke :) – Mayur

+0

Kein Problem, viel Glück mit deinen Programmierprojekten! –