Shiny中的非反应范围

Question

在我的Shiny App中，有两个输入：观察数量（整数）和颜色（红色，绿色和蓝色之间选择的字符）。 还有一个“GO！”动作按钮。

要使用哪种闪亮功能：

• 重新生成随机数并更新直方图 这个新数据仅当用户点击“Go！”时按钮。
• 可以动态改变直方图的颜色，不用 重新生成随机数。

我更喜欢一种能够为代码提供最大清晰度的解决方案。

请参阅以下我的myKotlinClass.getField()暂时未成功试用。

isolate

Answer 1

这样的东西？它只会在按下按钮时更新data()变量。您可以阅读observeEvent和eventReactive here

rm(list = ls())
# launch the App
library(shiny)
ui <- fluidPage(
  sliderInput("obs", "Number of observations", 0, 1000, 500),
  selectInput('color', 'Histogram color', c('red', 'blue', 'green')),
  actionButton("goButton", "Go!"),
  plotOutput("distPlot")
)

# Code for the server
server <- function(input, output) {
  data <- eventReactive(input$goButton,{
    rnorm(input$obs)
  })

  output$distPlot <- renderPlot({
    return(hist(data(), col=input$color))
  })
}
shinyApp(ui, server)