在R Shiny中观察输入的变化并更新输出

Question

我想观察input中的变化。当input发生变化时，output应该更新。

    output = reactiveValues(a = 10)
    input = reactiveValues(act1 = 0, act2 = 0)
    eventReactive(input$act1, { output$a = 20 })
    eventReactive(input$act2, { output$a = 30 })
    isolate(input$act1)
    # 0
    isolate(output$a)
    # 10
    input$act1 = 1
    isolate(output$a)
    # 10
    isolate(input$act1)
    # 1

我希望output$a在更改input$act1后变为20。但这并没有发生。

由于input是一个反应值对象，它应该调用eventReactive返回的反应式表达式对象。为什么output$a没有更新？