如何从最顶层垂直偏移wellPanel？

Question

我在wellPanel中只有一行和一列的布局。我的目标是垂直偏移这个面板。目前它已经粘合了＃34;到最顶端，但应该向下移动几厘米。

library(shiny)

ui <- fluidPage(
  wellPanel(fluidRow(column(width = 11, align = "center", h3("I need to move south!")))))

server <- function(input, output) {}

shinyApp(ui = ui, server = server)

Answer 1

您可以将wellPanel()打包在absolutePanel()

中

library(shiny)
ui <- fluidPage(
   absolutePanel(top = "50%", left = 20, width = "97.5%", 
            wellPanel(
              fluidRow(
                column(
                  width = 12,
                  align = "center", h3("I am at the centre!")
                )
              )
            )
 )
)

server <- function(input, output){}
shinyApp(ui, server)