如何使用fluidRow和mainPanel使文本居中？

Question

我想将 afluidRow中的一些文本居中mainPanel。因此，我尝试：

library(shiny)

ui <- fluidPage(
  mainPanel(
    fluidRow(
      align = "center",
      "How to center this?"
    )
  )
)

server <- function(input, output) {}

shinyApp(ui, server)

然而，文本明显偏离中心（太左）。如果我省略它就mainPanel(...)可以了。

Answer 1

它确实居中，mainPanel只是不占据全宽。如果你看一下?mainPanel()， 的参数width默认是8。如果您想要全宽，请将其设置为 12。

library(shiny)

ui <- fluidPage(
   mainPanel(
      fluidRow(
         align = "center",
         "How to center this?"
      ), width = 12
   )
)

server <- function(input, output) {}

shinyApp(ui, server)