Rmarkdown 生成的 HTML 表的颜色问题
Color trouble with Rmarkdown generated HTML tables
也许这只是一个愚蠢的浏览器相关问题,但是...
我使用 tableHTML
包通过 Rmarkdown
在 HTML 文件中生成一些彩色 tables(颜色由 RColorBrewer
包生成) :
```{r Init, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
require(magrittr, quietly = TRUE)
require(tableHTML)
test <- data.frame(A=123, B=456, C=789)
```
...
```{r Test, echo=FALSE, results="asis"}
tableHTML(test) %>%
add_css_thead(css = list('background-color', '#4DAF4A')) %>%
add_css_table(css = list('border', '#4DAF4A'))
```
边框的颜色在“Rstudio”查看器中看起来不错:
但在 Safari 或 Firefox 中打开时边框颜色不同:
table 边框颜色有什么问题?
根据https://www.colorhexa.com/4daf4a,最接近“#4daf4a”的网络安全颜色是“#669933”。将边框更改为#669933 是否解决了您的问题?
非常感谢您的提问!
对于 add_css_table
,样式应用于 table
标签,对于 add_css-thead
,它应用于 thead
标签。但我认为要获得您正在寻找的效果,您可以通过函数 add_css_header
和 add_css_column
:[=22= 将样式应用于 th
和 td
标签]
tableHTML(test) %>%
add_css_header(css = list(c("background-color", "border"),
c("#4DAF4A", "1px solid #4DAF4A")),
headers = 0:4) %>%
add_css_column(css = list("border", "1px solid #4DAF4A"),
columns = c("rownames", names(test)))
在 RStudio 中,它看起来像这样:
在 Firefox 中:
并且在 Chrome 中:
也许这只是一个愚蠢的浏览器相关问题,但是...
我使用 tableHTML
包通过 Rmarkdown
在 HTML 文件中生成一些彩色 tables(颜色由 RColorBrewer
包生成) :
```{r Init, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
require(magrittr, quietly = TRUE)
require(tableHTML)
test <- data.frame(A=123, B=456, C=789)
```
...
```{r Test, echo=FALSE, results="asis"}
tableHTML(test) %>%
add_css_thead(css = list('background-color', '#4DAF4A')) %>%
add_css_table(css = list('border', '#4DAF4A'))
```
边框的颜色在“Rstudio”查看器中看起来不错:
但在 Safari 或 Firefox 中打开时边框颜色不同:
table 边框颜色有什么问题?
根据https://www.colorhexa.com/4daf4a,最接近“#4daf4a”的网络安全颜色是“#669933”。将边框更改为#669933 是否解决了您的问题?
非常感谢您的提问!
对于 add_css_table
,样式应用于 table
标签,对于 add_css-thead
,它应用于 thead
标签。但我认为要获得您正在寻找的效果,您可以通过函数 add_css_header
和 add_css_column
:[=22= 将样式应用于 th
和 td
标签]
tableHTML(test) %>%
add_css_header(css = list(c("background-color", "border"),
c("#4DAF4A", "1px solid #4DAF4A")),
headers = 0:4) %>%
add_css_column(css = list("border", "1px solid #4DAF4A"),
columns = c("rownames", names(test)))
在 RStudio 中,它看起来像这样:
在 Firefox 中:
并且在 Chrome 中: