如何在R中使用DT :: Datatable的rowCallback jQuery定位特定列

Question

我正在尝试修改当前的行回调代码，使其以实例列1和4：last列为目标。

我当前行的目标是col 3：end

 "for (i =  3; i < data.length; i++) {",

我试图这样写：

 "for (i = 1 | i =  3; i < data.length; i++) {",

，但随后它停止工作。努力寻找正确的语法

我现在所拥有的是：

library(DT)
  Table_opts <- list(
    dom = 'Bfrtip',
    searching = F,
    pageLength = 50,
    searchHighlight = TRUE,
    colReorder = TRUE,
    fixedHeader = TRUE,
    buttons = c('csv', 'print'),
    paging    = TRUE,
    deferRender = TRUE,
    scrollX = T,
    scrollY = 310,
    rowCallback = JS(
      "function(row, data) {",
      "for (i =  3; i < data.length; i++) {",
      "if (data[i]>1 | data[i]<0){",
      "$('td:eq('+i+')', row).html(data[i].toExponential(1));",
      "}",
      "}",
      "}")
  )
DT::datatable(mtcars, rownames = F, selection = "single",
              extensions = c('Buttons', 'FixedHeader',  'ColReorder','Scroller'), options = Table_opts)