r - 如何更新 R Shiny 中的按钮标签？

Question

R Shiny 网站有一个关于如何根据用户输入更新各种输入类型的标签和值的 great example。但是，我找不到任何按钮。具体来说，如何根据用户输入更新按钮的标签？

Answer 1

您可以像这样动态创建 Button，同时更新标签:

library(shiny)

ui =(pageWithSidebar(
  headerPanel("Test Shiny App"),
  sidebarPanel(
    textInput("sample_text", "test", value = "0"),
    #display dynamic UI
    uiOutput("my_button")),
  mainPanel()
))

server = function(input, output, session){
  #make dynamic button
  output$my_button <- renderUI({
    actionButton("action", label = input$sample_text)
  })
}
runApp(list(ui = ui, server = server))