R-shiny app- DT package 列信息

Question

我正在嘗試使用 DT package 創建一個 R shiny 應用程序。我想在用戶切換時添加有關列 header 的信息。 示例：在“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)
          )
)