Ich möchte eine R-glänzende App mit einer dynamischen Eingabe erstellen, die den Benutzer nach einer numerischen Eingabe fragt und dann basierend auf dieser Eingabe 4 weitere Eingabefelder generiert. Hier ist was ich vorhabe.

library(shiny)

# Define UI for random distribution application 
shinyUI(fluidPage(

  # Application title
  titlePanel("Calcs"),

  # Sidebar with controls to select the random distribution type
  # and number of observations to generate. Note the use of the
  # br() element to introduce extra vertical spacing
  sidebarLayout(
    sidebarPanel(
     numericInput("dorr", "How many inputs do you want",4),
     i = i+1
     while(input$dorr<i){
      numericInput("S", "Number of simulations to run:", 10)
      i=i+1
     }
     numericInput("S", "Number of simulations to run:", 10),
     actionButton(inputId = "submit_loc",label = "Run the Simulation")
     ),


     mainPanel(

  )
)))

Ich weiß, dass der obige Code nicht funktioniert, aber es ist meine Begründung. Ich weiß, dass Shiny bedingte Anweisungen hat, aber ich kann anscheinend keine finden, mit denen ich eine vordefinierte Anzahl zusätzlicher Felder generieren kann. Ist das überhaupt möglich?