r - 突出显示 R 中 grid.table/tableGrob 中的特定列
问题描述
我想将表格的特定列突出显示为不同的颜色。
当我使用 grid.table 将其保存为图像时,这就是现在表格的显示方式。
我希望突出显示 RMSE 和 MAPE 列,因此应该是不同的颜色,比如黄色。
我正在使用以下代码,但只有列标题被突出显示,而不是数据。
cols <- c("grey90","grey90", "yellow", "grey90","grey90", "yellow", "grey90",
"grey90", "grey90", "grey90")
t1 <- ttheme_default(
core=list(bg_params = list(col=cols)),
colhead=list(bg_params = list(fill=cols)))
这就是桌子之后的样子。
解决方案
当传递一个颜色向量时,它的长度必须与元素总数 (18) 的长度相同,或者更短/更长,但在这种情况下,它的第一个 nrow 元素将按列循环。
library(gridExtra)
cols <- c("grey90","yellow", "green")
t1 <- ttheme_default(
core=list(bg_params = list(fill=cols)))
d <- data.frame(matrix(round(rnorm(18)),2,9))
names(d) <- letters[1:9]
grid.newpage()
grid.table(d, theme=t1)
推荐阅读
- java - Collectors.groupingBy 基于嵌套的静态类属性
- python - Python:获得路径中所有父母的可迭代的优雅方法
- javascript - javascript 正则表达式如何匹配这个 'And' 'Or'
- alamofire - 你如何在 Alamofire 5 中实现 RequestAdapter?
- php - jQuery ajax 没有向 WordPress 发送 post 变量
- spring - 在 Hystrix 中 maxQueueSize 和 queueSizeRejectionThreshold 是如何工作的
- angular - 我的代码有什么问题吗?我需要通过 Angular 中使用的服务方法将 Header 组件中选择的“字符串”传递给应用程序组件
- python - 是否有用于解析复杂的基于字符串的查询的库或规范
- c - 在 C 中连接字符串 - `strcpy(s1 += strlen(s1), s2)`
- python - 在不使用内置函数的情况下返回第 n 个最小的数字 - Python