所以我有一个闪亮的UI，当在循环中时不会显示，但当放在循环外时它会运行。我需要做什么吗？其他所有的东西都在循环中运行，但它不会停下来打开UI。无论是否包含launch.browser选项，都会发生这种情况。
例如：

if (x > 10) {
  .
  .
    
    # Define UI ----
    ui <- fluidPage(
      titlePanel("Brands To Match To"),
        mainPanel(
          hr("Common User Entered Words:"),
          hr(),
          x <- (paste(commonnames, collapse = ", ")),
          hr(),
          uiOutput("CheckBox"),
          actionButton("save", "Save")
        )
      )
    
    # Define server logic ----
    server <- function(input, output, session) {
      words <- reactiveValues(words = list())
      
      observeEvent(input$save, {
        stopApp()
      })
      
      output$CheckBox <- renderUI({
        lapply(seq_along(vector), function(i) {
          textInput(inputId=paste0("word",i), label=vector[i])
        })
      })
      
      observe({
        assign("words", list(
          word1 = input$word1,
          word2 = input$word2,
          word3 = input$word3,
          word4 = input$word4,
          word5 = input$word5,
          word6 = input$word6,
          word7 = input$word7,
          word8 = input$word8,
          word9 = input$word9,
          word10 = input$word10,
          word11 = input$word11,
          word12 = input$word12,
          word13 = input$word13,
          word14 = input$word14,
          word15 = input$word15,
          word16 = input$word16,
          word17 = input$word17,
          word18 = input$word18,
          word19 = input$word19,
          word20 = input$word20
        ), envir = .GlobalEnv)
      })
      
      session$onSessionEnded(function() {
        stopApp()
      })
    }
    
    
    shinyApp(ui = ui, server = server,options=c(launch.browser = rs.invokeShinyPaneViewer))
    
}

版本：_
平台x86_64-w64-明w32
拱形x86_64
操作系统Mingw32
阴极射线管
系统x86_64，明w32
地位
大4
次要2.2
二零二二年
第10个月
第31天
软件版本83211
R语言
version. string R版本4.2.2（2022 - 10 - 31 ucrt）昵称清白与信任