DT 在诊断时更改颜色答案

【问题标题】：DT change color on diagDT 在诊断时更改颜色
【发布时间】：2016-06-14 11:07:41
【问题描述】：

有没有办法改变DT中目标单元格的颜色？还是按行和列索引的一些单元格？

例如我有：

library(DT)
set.seed(123)
options(DT.options = list(pageLength = 5))
df = as.data.frame(cbind(matrix(round(rnorm(50), 3), 10), sample(0:1, 10, TRUE)))

datatable(df)%>% formatStyle(
'V6',
  backgroundColor = styleEqual(c(0, 1), c('gray', 'yellow'))
)

看起来像：

我可以更改行或单元格的颜色（基于当前行的单元格）

但我找不到根据 col 和 row 索引更改颜色的方法，例如：

【问题讨论】：

标签： r shiny dt

【解决方案1】：

找到一个可能不是最好的方法——根据ncol 的data.frame 生成rowCallback

喜欢

datatable(df,options = list(rowCallback=JS(paste("function(row, data,index) {",
                                                 paste(sapply(1:(ncol(df)),function(i) paste("
                                                   var ind_1=",i,";
                                                   $(this.api().cell(row,ind_1).node()).css({'background-color':index +1>ind_1 ? '#CCFFCC' : index+1 < ind_1 ? 'red' : 'yellow'});
                                                   "
                                                 )),collapse = "\n"),"}" )
                                                 )))

结果

【讨论】：