在本地运行我的 ShinyApp 时,网页交互永远不会关闭(变成灰色并且不需要用户输入)。在浏览器 r-server RStudio 中运行相同的应用程序时,应用程序会在一分钟左右关闭。
任何虚拟服务器都可以,但例如
library(shiny)
ui <- fluidPage(
h1("Example"),
inputPanel(
actionButton("button", "This is button")
)
)
server <- function(input, output){
observeEvent(input$button,
print("Button pressed.")
)
}
shinyApp(ui=ui, server=server)
遵循所描述的行为。
如何禁用或绕过它?