R Entrada dinâmica brilhante
Quero criar um aplicativo R brilhante que tenha uma entrada dinâmica que solicite ao usuário uma entrada numérica e, com base nessa entrada, gere mais 4 campos de entrada. Aqui está o que eu tenho em mente.
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(
)
)))
Eu sei que o código acima não funciona, mas é o meu raciocínio. Eu sei que o Shiny possui instruções condicionais, mas não consigo encontrar uma que permita gerar um número pré-especificado de campos adicionais. Isso é possível?