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

Question

R Shiny网站有一个很好的例子,说明如何根据用户输入更新各种输入类型的标签和值.但是,我找不到按钮的任何内容.具体来说,如何根据用户输入更新按钮的标签？

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))