html - 如何根据在另一列中找到的十六进制字符串为一列中的值着色?
问题描述
我有一个数据表,称之为T,如下:
library(DT)
T <- data.frame(
col1= c("abcd", "wxyz"),
col2 =c("#ff0000","#00FF00"), stringsAsFactors = FALSE)
我的目标是有一个列,其中 col1 中的值与 col2 中的十六进制值相应地着色。
我尝试过:
datatable(T) %>% formatStyle(
'col1',
backgroundColor = styleEqual(c(0, 1), list(unique(T$col2))
)
此参考可能对https://rstudio.github.io/DT/010-style.html有所帮助,我只需要有关解决方法的帮助。如果我能澄清,请告诉我。谢谢!
解决方案
我认为这会做你想要的
datatable(T[, "col1", drop=FALSE]) %>% formatStyle(
'col1',
backgroundColor = styleEqual(T$col1, T$col2)
)
在这里,我删除了您不想显示的列,然后styleEqual
根据该列中的值设置颜色。
推荐阅读
- azure - 使用 Azure TimeSeries Insights 获取时间序列的最后一个值
- redis - 获取整个 redis 集群的 INFO 状态的方法?
- woocommerce - 仅在 woocommerce 购物车页面上的 wp_head 中包含 javascript 代码并获取购物车小计和货币
- jupyter-notebook - 如何将情节可视化嵌入到谷歌幻灯片?
- java - 我的第一个代码问题!学习 Java 并需要帮助对数组执行基本统计信息
- atom-editor - Atom 功能键绑定。如何绑定 F5 将所选文本的大小写更改为大写
- linux - 为 mmap() 内存手动触发页面错误,用于长序列的随机读取
- javascript - How do I print out json data
- webots - 在 Webots 中编写机器人代码
- azure-devops - 您如何将 PBI 从一个 sprint 移动到另一个 sprint 并将其反映到 Rolling up 状态