Как уже упоминалось в комментариях, все, что вам нужно сделать, это установить глобальный параметр shiny.autoreload
.
Вот очень простой пример того, как его использовать:
library(shiny)
options(shiny.autoreload = TRUE) # also check shiny.reactlog and shiny.trace for debugging
ui <- fluidPage(
sliderInput(inputId = "mySlider", label = "my super useful Slider", min = 0, max = 10, value = 20)
)
server <- function(input, output, session) {}
shinyApp(ui, server)
Обзор аналогичных блестящих опций см. В этой статье .