我无法控制在Shiny应用程序中使用dataTableOutput()
函数添加的datatable的宽度。我尝试使用函数内的width
参数,但输出结果没有任何变化,并且也没有错误提示-它没有告诉我忽略了width
参数。
library(shiny)
library(shinythemes)
ui <- fluidPage(theme = shinytheme("Spacelab"),
fluidRow(
column(6,dataTableOutput(outputId = "table")),
column(6,p(textOutput("para")))
)
)
server <- function(input, output){
df <- as.data.frame(matrix(0, ncol = 15, nrow = 20))
output$table <- renderDataTable({df})
output$para <- renderText({
text <- rep(x = "Hello World",1000)
})
}
shinyApp(ui = ui,server = server)
shiny::dataTableOutput
中没有看到width
参数,但似乎来自DT包的dataTableOutput
有一个。你是否在加载shiny之后加载了DT包?你也可以使用DT::dataTableOutput
。 - aosmithDT
而不是shiny
,数据表是否仍然具有响应性? - Collin