R Shiny Table折叠文本溢出

【问题标题】：Rshiny Table collapse text overflowR Shiny Table折叠文本溢出
【发布时间】：2015-11-25 23:17:25
【问题描述】：

我们如何将 CSS 参数 text-overflow: ellipsis 或其他参数传递给 R shiny 中的 renderDataTable ？我在列中有不均匀的文本描述，通过自动宽度，行和列会根据相应单元格中的内容进行扩展。

我希望能够输入“省略号”，以便用户能够扩展单元格以阅读文本。下面是我的 server.r 代码。我尝试使用 http://rstudio.github.io/DT/options.html 中解释的 eg。但是，无法得到我要找的东西。赞赏是否提供了任何输入，建议。

谢谢

【问题讨论】：

标签： css r rstudio shiny

【解决方案1】：

解决了。问题在于我传递论点的方式不正确。正确的方法如下。

  output$PM_output <- DT::renderDataTable(
    expr =  DT::datatable(data.frame.eg),
                          class   = 'cell-border stripe compact hover',
                          escape  = F, selection = 'multiple',
                          options = list(
                            autoWidth  = T,
                            LengthMenu = c(5, 30, 50),
                            columnDefs = list(list(
                              targets  = 6,
                              render   = JS(
                                "function(data, type, row, meta) {",
                                "return type === 'display' && data.length > 100 ?",                                    "'<span title=\"' + data + '\">' +
                                data.substr(0, 100) + '...</span>' : data;", "}"))),
                              pageLength = 1, server = T)))

【讨论】：