反应

可以使用反应来使输出依赖于另一个表达式。在下面的示例中，输出$ text 元素依赖于 text_reactive，而 text_reactive 又依赖于 input $ user_text。每当输入$ user_text 发生更改时，输出$ text 元素和 text_reactive 都会**失效。**它们是根据 input $ user_text 的新值重新计算的。

library(shiny)

ui <- fluidPage(
  headerPanel("Example reactive"),
  
  mainPanel(
    
    # input field
    textInput("user_text", label = "Enter some text:", placeholder = "Please enter some text."),
    
    # display text output
    textOutput("text"))
)

server <- function(input, output) {
  
  # reactive expression
  text_reactive <- reactive({
    input$user_text
  })
  
  # text output
  output$text <- renderText({
    text_reactive()
  })
}

shinyApp(ui = ui, server = server)