Css 更改shinydashboard R中侧栏的位置

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

库（闪亮）
图书馆（shinydashboard）
ui我不完全确定这一点，但我怀疑它能做到。shinydashboard基于AdminLTE主题，正如您在本期github中看到的，如果不使用不同的主题分支，似乎不可能移动侧边栏
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)