小编use*_*810的帖子

嗨，我想创建一个闪亮的 UI，用户可以将数据集的名称输入到文本框中，比如“testdataset”。然后通过单击和操作按钮选择此（示例）分析 1 或分析 2 中的特定过程。一旦发生这种情况，我希望文本框显示原始数据集名称以及选择的分析，即“testdataset-analysis1”。我已经在下面构建了示例 UI，但我是 R 的新手，并且闪亮，并且不知道如何捕获事件并在 UI 和服务器之间传递变量并呈现它们。有人可以帮忙吗？ 我想实现
图书馆的例子（闪亮）

  #====shiny UI
  shinyUI(pageWithSidebar(
    headerPanel("Shiny action button input "),
    sidebarPanel(
      textInput(inputId="data1", label = "Input data name"),

      actionButton("Ana1", "analysis1"),
      actionButton("Ana2", "analysis2")
    ),
    mainPanel(
  #
    )
  ))

  #====shiny server
  shinyServer(
    function(input, output) {
      output$data1 <- renderText({input$data1})

    })
  }
  )

  runApp()#to run application