R 闪亮鼠标悬停到所有 table 个单元格

Question

如何实现所有 table 单元格（不是列名）的鼠标悬停文本。我有 3 列的数据table。将鼠标悬停在第 3 列的单元格上时，需要显示该特定内容的第 1 列和第 2 列的组合内容 row.I 尝试探索 DT 包以实现相同但没有 success.Any 提示或者我们是否有任何库支持悬停 table 秒。

Answer 1

您需要使用 rowCallback 来执行此操作。这是您想要实现的目标的简单示例：

library(shiny)

shinyApp(
  ui = fluidPage(
    DT::dataTableOutput("mtcarsTable")
    ),
  server = function(input, output) {

    output$mtcarsTable <- DT::renderDataTable({
      DT::datatable(datasets::mtcars[,1:3], 
                    options = list(rowCallback = JS(
                      "function(nRow, aData, iDisplayIndex, iDisplayIndexFull) {",
                      "var full_text = aData[0] + ','+ aData[1] + ',' + aData[2] + ','+ aData[3];",
                      "$('td:eq(3)', nRow).attr('title', full_text);",
                                            "}")
                    )
      )

    })
  }
)

希望对您有所帮助！

R 闪亮鼠标悬停到所有 table 个单元格

R shiny mouseover to all table cells

jquery

r

shiny

dt