有没有办法在单击按钮时滚动到 ShinyDashboard 中的页面顶部？
我已经添加了以下几行ui.R下dashboardSidebar(：
useShinyjs(),
extendShinyjs(text = "shinyjs.button = function() {document.body.scrollTop = 0;}"),
并在以下server.R下observeEvent(input$button, {：
js$button()
这似乎适用于 RStudio 的应用程序预览，但不适用于浏览器。