小编use*_*149的帖子

我想要一个按钮（比如 A），sidebarPanel这样在使用它之后另一个按钮（比如 B）将被激活（通过renderUI），但按钮 A 将消失。我怎样才能做到这一点

这是我天真的解决方案。我不知道如何避免将按钮状态指向自身：

library(shiny)
runApp(list(

   ui = fluidPage(
      uiOutput("answer"),
      uiOutput("part2")
      ),

   server = function(input, output) {

      output$answer <- renderUI({
         if(input$continue == 0){
            checkboxGroupInput(inputId = "firstQ", label = "First question", choices = c("Ans. A" = "a", "Ans. B" = "b"))
            actionButton("continue", "Continue")}
      })

      output$part2 <- renderUI({
         if(input$kontynuuj > 0)
            actionButton("newButton", "New button")
      })

   }
))