R闪亮的仪表板滚动到顶部的按钮点击 [英] R Shiny Dashboard Scroll to Top on Button Click

问题描述

是否可以通过单击按钮滚动到ShinyDashboard中页面的顶部？

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

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

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

js$button()

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

推荐答案

使用first Google hit为"javascript滚动到顶部"，最高的答案是window.scrollTo(x-coord, y-coord);

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

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

这篇关于R闪亮的仪表板滚动到顶部的按钮点击的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！