【发布时间】:2020-02-12 16:24:37
【问题描述】:
我正在尝试使用 DT 包创建一个 R 闪亮的应用程序。当用户切换它时,我想添加有关列标题的信息。示例:在“mtcars”数据集中,如果用户切换到“mpg”列,他们应该能够看到它的单行定义。我在网上搜索了解决方案,但找不到任何解决方案。我真诚地感谢你在这方面帮助我。 另外,如果有人能给我发一些漂亮的 DT 相关应用的链接,我将不胜感激。
【问题讨论】:
我正在尝试使用 DT 包创建一个 R 闪亮的应用程序。当用户切换它时,我想添加有关列标题的信息。示例:在“mtcars”数据集中,如果用户切换到“mpg”列,他们应该能够看到它的单行定义。我在网上搜索了解决方案,但找不到任何解决方案。我真诚地感谢你在这方面帮助我。 另外,如果有人能给我发一些漂亮的 DT 相关应用的链接,我将不胜感激。
【问题讨论】:
你可以这样做:
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)
)
)
【讨论】: