在闪亮的应用程序中移动html标题

Question

我有一个基本的闪亮仪表板，在其中我想将标题“指定要查看的数据”稍微向右移动，以便与selectInput()对齐。 align参数对于我使用left right还是center都无济于事。

## app.R ##
library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(
    h5('Specify Data to View',align = "left"),
    selectInput("select", label = "Select box", 
                choices = list("Choice 1" = 1, "Choice 2" = 2, "Choice 3" = 3), 
                selected = 1)
  ),
  dashboardBody()
)

server <- function(input, output) { }

shinyApp(ui, server)