2016-05-04 16 views

Antwort

1

Hier ist ein Beispiel dafür, wie es (minimal app) zu verwenden:

library(shiny) 

ui <- fluidPage(
    selectInput('input1', 'Select a Number', choices = seq(1:5)), 
    uiOutput('output1') 
) 


server <- function(input, output) { 
    output$output1 <- renderUI({ 
    h1(paste('You selected number: ', input$input1)) 
    }) 
} 

shinyApp(ui = ui, server = server) 
+0

Vielen Dank! Ich hatte gegoogelt, aber war nicht auf dieses – helloB

+0

Kein Problem gestoßen. Dieser Ansatz funktioniert für so ziemlich jede dynamische Benutzeroberfläche, die Sie serverseitig generieren möchten. – Gopala

Verwandte Themen