Я пишу веб-приложение на блестящем и не уверен, что пишу эффективный код для условных панелей.Я хочу, чтобы, если пользователь щелкнул «Да» на кнопке radioButton, появилось много других входных данных.Первоначально я использовал «conditionalPanel» в моем Ui, а затем купил 5 uiOutputs.Однако я заметил, что renderUi запускается при запуске приложения, даже когда кнопка не говорит «Да».Я изменил код, поэтому мне не нужна условная панель, НО я вижу, что происходит то же самое.Это эффективно?У меня будет несколько uiOutputs, вот только один, например.
UI.R
radioButtons("add_indicator1", "Add long indicators", choices = c("No", "Yes")),
uiOutput("long1"),
SERVER.R
button1 = reactive({
input$add_indicator1
})
output$long1 = renderUI({
if(button1() == "No"){NULL
}else{selectInput ("indicator1", "Select the first long indicator",
choices = c("Choices" = "", long_indicators))}
})