R 如何在滚动时固定标题面板（或shinyWidgets:：panel）？

我感兴趣的是在滚动时，在页面顶部固定一组操作按钮。 我如何为基础闪亮的“titlePanel”或“shinyWidgets:：panel”（或两者）做到这一点

我尝试为基础应用程序编写UI代码：

---

ui你就快到了。您只需将
标题面板
包装在
div
中即可设置样式：

library(shiny)

ui <- shinyUI(fluidPage(
  div(titlePanel(fluidRow(
               column(12, align="center",
                      actionButton("rmd1", "RMD1"),
                      actionButton("rmd2", "RMD2")
               )
             )), style = "position:fixed; width:inherit;"),
  uiOutput("uioutput", height = "2000px")

))

server <- function(input, output, session) {
  output$uioutput <- renderUI({tagList(HTML(rep("...<br>", 100)), hr())})
}

shinyApp(ui, server)

库（闪亮）
ui的职位：绝对似乎不适合我。我添加了一个关于absolutePanelposition的编辑：fixed应该是正确的，基于。你试过添加吗！重要吗？