r - Shiny 的 observeEvent() 中的执行顺序是什么？

Question

我想单击一个按钮，触发 insertUI，计算一些东西，最后删除 UI。而insertUI/removeUI是计算后生效的。

我正在按照官方示例动态更新 UI。 https://shiny.rstudio.com/articles/dynamic-ui.html

在 removeUI 之后添加 Sys.sleep(2) 时，它似乎在删除元素之前执行。

ui <- fluidPage(
  actionButton("rmv", "Remove UI"),
  textInput("txt", "This is no longer useful")
)

server <- function(input, output, session) {
  observeEvent(input$rmv, {
    removeUI(
      selector = "div:has(> #txt)"
    )
    Sys.sleep(2)
  })
}

shinyApp(ui, server)

这是什么原因，如何解决？

Answer 1

您可能正在寻找 immediate 参数。

removeUI(selector = "div:has(> #txt)", immediate = TRUE)