ř闪亮仪表板的DataTable列宽[重复](R Shiny Dashboard DataTable

这个问题已经在这里有一个答案：

• ř闪亮设定数据表列宽 2个答案

我建立一个闪亮的仪表盘和仪表盘上的一个面板是一个DataTable。

下面是我的代码：

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

在数据表中的列的宽度现在与列名的宽度调节。 然而，一些细胞的值是文本，并且那些文本被挤压，因为它们比列名称较长的多行显示。

我想知道如果有一种方法可以有调整，以适应在同一行单元格值的列宽。

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

提前致谢。

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 Column Width [duplicate]