Совет Tool Shiny renderDataTable только для одного имени столбца

Question

У меня есть эта таблица в блестящей форме и вы хотите добавить только одну всплывающую подсказку для имени столбца «Виды», то есть другие столбцы не должны иметь всплывающую подсказку. Мне удалось добавить всплывающую подсказку для всех из них, но не знаю, как я могу настроить контент для определенных столбцов.

shinyApp(
    ui = fluidPage(
    fluidRow(
     column(12, 
      dataTableOutput('table') 
    ) 
    ) 
), 
    server = function(input, output) { 
    output$table <- renderDataTable(iris, options = list(
     pageLength = 5, 
     initComplete = I("function(settings, json) { 
             $('th').each(function(){this.setAttribute('title', 'TEST');}); 
             $('th').tooltip(); 

            }"))) 

          } 
    ) 

Answer 1

Я изменил код, чтобы получить всплывающую подсказку только для 4-го столбца, т.е. «Виды».

library(shiny) 

shinyApp(
    ui = fluidPage(
    fluidRow(
     column(12, 
      dataTableOutput('table') 
    ) 
    ) 
), 
    server = function(input, output) { 
    output$table <- renderDataTable(iris, options = list(
     pageLength = 5, 
     initComplete = I("function(settings, json) { 
         $('th:eq(4)').each(function(){this.setAttribute('title', 'TEST');}); 
         $('th').tooltip(); 

    }"))) 

    } 
    ) 

Надеюсь, это поможет!