Question

我想将fluidRow中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)

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

1 个答案: