Как остановить автоотключение блестящей приборной панели

Через 1 минуту моя блестящая приборная панель закрывается сама собой. Та же проблема возникает, если я открываю его в браузере, но на этот раз все окно становится затененным. Я всегда могу перейти от одного элемента меню к другому, но серия не появляется.

Я бы хотел, чтобы блестящая приборная панель никогда не выключалась и была готова к использованию в любое время, даже если я покину ее на определенное время.

РЕДАКТИРОВАТЬ

Даже если я попробую код здесь (ответ ismirsehregal), моя панель всегда закрывается.

ui <- dashboardPage(
  dashboardHeader(),

  dashboardSidebar(),

  dashboardBody(tags$head(tags$style(HTML("<script>
                                                var socket_timeout_interval
                                                var n = 0
                                                $(document).on('shiny:connected', function(event) {
                                                socket_timeout_interval = setInterval(function(){
                                                Shiny.onInputChange('count', n++)
                                                }, 15000)
                                                });
                                                $(document).on('shiny:disconnected', function(event) {
                                                clearInterval(socket_timeout_interval)
                                                });
                                            </script>"))),
                                                      textOutput("keepAlive")))

server <- function(input, output, session) {

  output$keepAlive <- renderText({
    req(input$count)
    paste("keep alive ", input$count)
  })}

shinyApp(ui, server)