R Shiny:输入输入或按下操作按钮时刷新情节

R Shiny : Refreshing plot when entering input OR pressing an action button

我是 R Shiny 的新手,但一段时间以来一直被以下问题困扰,希望您能提供一些帮助:

提前致谢。

像这样?:

编辑:无需将 selectInput 传递给反应式 Vals.. 这也是一样的:

library(shiny)

ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      selectInput(inputId="select", label="title", choices=LETTERS[1:3], selected = "A"),
      actionButton(inputId="btn", label="refresh")
    ),
    mainPanel(
      plotOutput("scatterPlot")
    )
  )
)

server <- function(input, output) {

  plotSettings <- reactiveValues()

  observeEvent(c(input$btn, input$select), {
    plotSettings$values <- runif(100,1,100)
    # plotSettings$title <- input$select
  }, ignoreNULL = FALSE)

  output$scatterPlot <- renderPlot({
    plot(plotSettings$values, main=input$select)
  })
}

shinyApp(ui = ui, server = server)