如何在悬停单元格时弹出行名

Question

在这段代码的帮助下，我只能将行名称悬停在第一列，但我需要悬停所有列的行名称需要这方面的帮助提前致谢

 shinyApp(
      ui = fluidPage(
       DT::dataTableOutput("table2")
      ),
      
  server = function(input, output) {
    
    output$table2<-DT::renderDataTable({
      responseDataFilter2_home<-mtcars
      displayableData<-DT::datatable(
        responseDataFilter2_home,
        options = list(rowCallback = JS(
          "function(nRow, aData, iDisplayIndex, iDisplayIndexFull) {",
          "var full_text = aData[0] ",
          "$('td:eq(1)', nRow).attr('title', full_text);",
          "}"),
          
           columnDefs = list(
            list(width = '800%', targets = c(1)))),
        selection = 'single', 
        escape=FALSE,
        
        )
    })
  }
)

Answer 1

library(DT)

datatable(
  mtcars,
  options = list(
    rowCallback = JS(
      "function(row, data, displayNum, displayIndex, dataIndex) {",
      "  var rowName = data[0];",
      "  $(row).find('td').attr('title', rowName);",
      "}")
  )
)

如何在悬停单元格时弹出行名

how to popup the rowname while hovering the cell

r

datatables

dt