Search 我如何移动DT表；搜索框“；要在桌子的左侧-（桌子在shinydashboard box（）内）？

对于如何将DT表上的“搜索框”移动到左侧，并在顶部添加标题，是否有人有解决方案。该表位于shinydashboard应用程序的box（）元素中。（代码如下）。谢谢

body这就是想法

library(DT)
library(shiny)

ui <- basicPage(

  DT::dataTableOutput("mytable"),

  tags$style(HTML(".dataTables_wrapper .dataTables_length {
                  float: right;}
                  .dataTables_wrapper .dataTables_filter {
                  float: left;
                  text-align: left;}"
                  )
            )
    )

server <- function(input, output) {
  output$mytable = DT::renderDataTable({
  mtcars})
}

shinyApp(ui, server)

库（DT）
图书馆（闪亮）
ui一个想法是用自定义css覆盖现有css。如果你能提供一个最小的工作示例，那么获得快速帮助会更容易。
library(DT)
library(shiny)

ui <- basicPage(

  DT::dataTableOutput("mytable"),

  tags$style(HTML(".dataTables_wrapper .dataTables_length {
                  float: right;}
                  .dataTables_wrapper .dataTables_filter {
                  float: left;
                  text-align: left;}"
                  )
            )
    )

server <- function(input, output) {
  output$mytable = DT::renderDataTable({
  mtcars})
}

shinyApp(ui, server)