答案 0 :(得分:3)
这是使用float
此方法适用于本示例,但请确保选中id
中闪亮应用程序中的搜索和输入框。在此示例中,它们是#DataTables_Table_0_length
和#DataTables_Table_0_filter
。
在Chrome中,如果右键单击并单击“检查”,然后向下滚动以找到要查找的零件。
library(DT)
library(shiny)
ui <- fluidPage(
tags$head(
tags$style(
HTML(
"#DataTables_Table_0_length {
float: right
}
#DataTables_Table_0_filter {
float: left
}
"
))),
h2("The mtcars data"),
DT::dataTableOutput("mytable")
)
server <- function(input, output) {
output$mytable = DT::renderDataTable({
mtcars
})
}
shinyApp(ui, server)