Установите положение и / или высоту меню боковой панели в блестящей приборной панели

Question

Есть ли способ отрегулировать высоту боковой панели на блестящей приборной панели или разместить ее горизонтально над корпусом приборной панели?

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

    ui <- dashboardPage(
      dashboardHeader(),
      dashboardSidebar(
sidebarMenu()
),
      dashboardBody()
    )

    server <- function(input, output) { }

    shinyApp(ui, server)