来自Javascript内部的参考查找表

Question

我有一个查找表，我希望能够在Javascript函数中使用它。出于我的目的，我在R中使用DT包，但我仍然坚持使用JS。

具体来说，对于每个表格数据（在第1列中），我想使用Javascript来分配表格＆＃39;属性基于查找表。

library(shiny)
library(dplyr)
library(DT)

server <- function(input, output) {

  speedLKU <- data.frame(Num = c('4','7','8'), Desc = c('Low','Medium','High'))

  output$carTable <- renderDataTable({

    cars[1:5,] %>% datatable(
      rownames = FALSE
    )

  })
}

ui <- fluidPage(
  mainPanel(dataTableOutput('carTable'))
)

shinyApp(ui = ui, server = server)

所以单元格（1,1）和（2,1）应该有一个标题＆＃39; ＆＃39;低＆＃39;的属性。单元格（3,1）和（4,1）应该具有标题＆＃39;属性为＆＃39; Medium＆＃39;。小区（5,1）应该有一个标题＆＃39;属性为＆＃39;高＆＃39;。