R闪亮的应用程序 - DT包列信息

Question

我正在尝试使用 DT 包创建一个 R 闪亮的应用程序。我想在用户切换列标题时添加有关列标题的信息。示例：在"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)
)
)