使用styleColorBar,如何使颜色条的大小与列的绝对值成正比?与此相反,在下面的示例中,查看cyl列,红色条越大,值越大。
代码:
data <- head(mtcars[,1:4])
data[,2] <- -data[,2]
data
out <- datatable(data, rownames = FALSE) %>%
formatStyle('mpg',
background = styleColorBar(data$mpg, 'lightblue'),
backgroundSize = '95% 50%',
backgroundRepeat = 'no-repeat',
backgroundPosition = 'right') %>%
formatStyle('cyl',
background = styleColorBar(data$cyl, 'red'),
backgroundSize = '95% 50%',
backgroundRepeat = 'no-repeat',
backgroundPosition = 'right')
out
Run Code Online (Sandbox Code Playgroud)
但是这两个例子似乎比我的更复杂。前者处理基于另一列格式化一列。后者的颜色条的方向取决于标志。我认为对于我的案例可能存在一个更简单的技巧......
谢谢
我已阅读 DT.pdf 文档并进行了搜索,但 DT 包似乎不支持不同的颜色。我怎样才能达到下面图片链接所示的效果?谢谢!