【发布时间】:2019-08-02 18:03:48
【问题描述】:
我正在尝试修改我当前的 rowcallback 代码,使其针对例如第 1 列和第 4 列:最后一列。
当前行我有目标 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)
【问题讨论】: