R Shiny Dashboard DataTable列宽

Question

我正在构建一个闪亮的仪表板，仪表板上的一个面板是一个数据表。

下面是我的代码：

  output$table = DT::renderDataTable(b1, selection = 'single')

数据中的列宽 table 现在已根据列名的宽度进行调整。但是，一些单元格值是文本，这些文本比列名称长，因此被压缩成多行显示。

我想知道是否有办法调整列宽以适应一行中的单元格值。

或者，有没有办法为列设置固定宽度并通过将鼠标悬停在其上来获取单元格值的全部内容？

提前致谢。

Answer 1

您可以使用 ellipsis 插件来限制单元格的可见字符数，并在工具提示中显示单元格的全部内容。

library(DT) 

dat <- data.frame(
  A = c("fnufnufroufrcnoonfrncacfnouafc", "fanunfrpn frnpncfrurnucfrnupfenc"),
  B = c("DZDOPCDNAL DKODKPODPOKKPODZKPO", "AZERTYUIOPQSDFGHJKLMWXCVBN")
)

datatable(
  dat, 
  plugins = "ellipsis",
  options = list(
    # limit cells in columns 1 and 2 to 17 characters
    columnDefs = list(list(
      targets = c(1,2),
      render = JS("$.fn.dataTable.render.ellipsis( 17, false )")
    ))
  )
)

R Shiny Dashboard DataTable列宽

R Shiny Dashboard DataTable Column Width

javascript

r

shiny

shinydashboard

dt