更改shinydashboard R

Question

我想将仪表板的侧边栏从左侧（闪亮的仪表板默认）更改为页面的右侧，但我不能。请帮忙... 这是一个示例代码（为方便起见，我已经改变了我要移动到页面右侧的两个部分的颜色）：

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(tags$head(tags$style(HTML('
                                  .skin-blue .main-header .logo {

                                          background-color: #000000;
                                          }

                                          /* main sidebar */
                                          .skin-blue .main-sidebar {

                                          background-color: #ef43ad;
                                          }'))))
)

server <- function(input, output) { }

shinyApp(ui, server)