我想更新observeEvent()内部的一个React组件,然后稍后调用它。但是该值不是全局传递的,而是在observeEvent()中局部传递的。
这不会更新myText()。
ui <- fluidPage(
textInput("name", "Enter your name:"),
actionButton("myButton", "Click me!"),
h4("Output:"),
verbatimTextOutput("myOutput")
)
server <- function(input, output, session) {
myText <- reactive({
paste("Hello, ", input$name, "!")
})
observeEvent(input$myButton, {
# Update the reactive value
myText <- reactive({
paste("Goodbye, ")
})
})
output$myOutput <- renderPrint({
myText()
})
}
shinyApp(ui, server)
如果我在observeEvent()中使用renderPrint(),这是可行的,但这不是我想要的。
有没有一种方法可以更新React式组件,使其对server()中的其他函数全局可用?
1条答案
按热度按时间yeotifhr1#
我用
reactiveValues()
找到了一个解决方案: