Как я могу получить текст наведения мыши для всех ячеек таблицы (не для имен столбцов). У меня есть datatable с 3 столбцами. При наведении курсора на ячейку третьего столбца необходимо отобразить объединенное содержимое 1-го и 2-го столбцов этой конкретной строки. Я попытался изучить пакет DT для достижения того же, но без успеха. Все советы или у нас есть библиотека, которая поддерживает зависание столы.
Для этого вам нужно использовать 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);",
"}")
)
)
})
}
)
Надеюсь это поможет!