Question

我正在尝试使用DT软件包创建R Shiny应用程序。我想在用户切换列标题时添加有关列标题的信息。示例：在“ mtcars”数据集中，如果用户切换“ mpg”列，则他们应该能够看到单行定义。我在网上搜索解决方案，但找不到任何解决方案。衷心感谢您为我提供的帮助。另外，如果有人可以向我发送一些与DT相关的精美应用程序的链接，我将不胜感激。

Answer 1

您可以这样做：

library(DT)

headerCallback <- c(
  "function(thead, data, start, end, display){",
  "  var tooltips = ['tooltip1','tooltip2','tooltip3','tooltip4','tooltip5'];",
  "  for(var i=0; i<5; i++){",
  "    $('th:eq('+i+')',thead).attr('title', tooltips[i]);",
  "  }",
  "}"
)

datatable(iris, rownames = FALSE, 
          options = list(
            headerCallback = JS(headerCallback)
          )
)

R-shiny应用程序-DT软件包列信息

1 个答案: