R 闪亮的仪表板操作按钮

R 闪亮的仪表板操作按钮,r,shiny,shinydashboard,R,Shiny,Shinydashboard,我有一个带有反应式操作按钮的闪亮仪表板,但该按钮不会更新仪表板 我使用sourceby ui.R将选项卡项拆分为它们自己的文件和引用 中的tabItem仅包含以下代码 actionButton("go", "Go"), numericInput("n", "n", 50), plotOutput("plot") server.R文件也被拆分,并使用源代码引用每个文件。 relavent文件包含的 randomVals <- eventReactive(input$go

我有一个带有反应式操作按钮的闪亮仪表板,但该按钮不会更新仪表板

我使用sourceby ui.R将选项卡项拆分为它们自己的文件和引用

中的tabItem仅包含以下代码

  actionButton("go", "Go"),
  numericInput("n", "n", 50),
  plotOutput("plot")
server.R文件也被拆分,并使用源代码引用每个文件。 relavent文件包含的

    randomVals <- eventReactive(input$go, {
      runif(input$n)
    })

    output$plot <- renderPlot({
      hist(randomVals())
    })

randovals你应该
隔离你的按钮,就像这样:

编辑:根据@tospig

rm(list = ls())
library(shiny)

shinyApp(
  ui=shinyUI(basicPage(
    actionButton("go", "Go"),
    numericInput("n", "n", 50),
    plotOutput("plot")
  )),
  server=shinyServer(function(input, output, session){

    randomVals <- eventReactive(input$go, {
      runif(input$n)
    })

    output$plot <- renderPlot({
      hist(randomVals())
    })
  })
)
rm(list=ls())
图书馆(闪亮)
shinyApp(
ui=shinyUI(基本页)(
动作按钮(“开始”,“开始”),
数字输入(“n”,“n”,50),
绘图输出(“绘图”)
)),
服务器=shinyServer(功能(输入、输出、会话){

随机变量我添加了一个提交按钮,如果我单击操作按钮,然后单击提交按钮,则绘图将更新。与没有闪亮的仪表板不同,go按钮只更新绘图。从-“Like
observeEvent()
eventReactive()
在第二个参数中用
isolate()
隔离代码块。”-这意味着你不需要隔离()
,不是吗?@tospig你是对的,不需要这样做。我编辑了我的答案