R Shiny Dashboard 在按钮单击时滚动到顶部

【问题标题】：R Shiny Dashboard Scroll to Top on Button ClickR Shiny Dashboard 在按钮单击时滚动到顶部
【发布时间】：2018-03-06 17:49:30
【问题描述】：

有什么方法可以通过单击按钮滚动到 ShinyDashboard 中的页面顶部？

我在ui.R 的dashboardSidebar( 下添加了以下几行：

useShinyjs(), 
extendShinyjs(text = "shinyjs.button = function() {document.body.scrollTop = 0;}"),

以及server.R下observeEvent(input$button, {下的以下内容：

js$button()

这似乎在 RStudio 的应用预览中有效，但在浏览器中无效。

【问题讨论】：

【解决方案1】：

使用first Google hit 表示“javascript 滚动到顶部”，获得最多投票的答案是window.scrollTo(x-coord, y-coord);

我尝试用window.scrollTo(0, 0) 替换您的document.body.scrollTop = 0;，它成功了。

仅供参考，如果你只定义一个非常简单的函数，你也可以在服务器代码中使用shinyjs::runjs("window.scrollTo(0, 50)")

【讨论】：