Как очистить переменную «изолировать», когда в R Shiny нажата кнопка сброса

Question

Я видел следующий код здесь в StackOverflow. Когда вы вводите значения в X и Y, сумма вычисляется, и отображается сообщение «X + Y =». Однако при сбросе сообщение «X + Y =» по-прежнему отображается в предыдущем примере. Как я могу очистить это сообщение, пожалуйста?

Вот код:

library(shiny)
library(shinyjs)


ui <- fluidPage(
  useShinyjs(),
  div(id="form",
  sidebarLayout(
    sidebarPanel(
      numericInput("x","X",0),
      numericInput("y","Y",0)
    ),
    mainPanel(
      br(),
      column(width=6,actionButton("calc", "Calculate")),
      column(width=6,actionButton("reset", "Reset")), 
      br(),br(),br(),
      textOutput("sum"))
  )
))


# Define the server logic
server <- function(input, output) {
  output$sum <- renderText({
    req(input$calc)
    isolate(paste("X + Y =", input$x + input$y))
  })

  observeEvent(input$reset, {
    reset("form")
      })
}

# Run the application
shinyApp(ui = ui, server = server)