2

也许这只是一个愚蠢的浏览器相关问题,但是......

Rmarkdown我通过使用包在 HTML 文件中生成了一些彩色表格tableHTML(颜色由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”查看器中看起来不错:

RStudio 查看器

但在 Safari 或 Firefox 中打开时,边框颜色不同:

苹果浏览器 火狐

表格边框颜色有什么问题?

4

2 回答 2

2

非常感谢您的提问!

使用add_css_table,样式应用于table-tag 和 with add_css-thead,应用于thead标记。但我认为要获得您正在寻找的效果,您可以通过函数将样式应用于thandtd标签:add_css_headeradd_css_column

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 中,它看起来像这样:

table_rstudio

在火狐中:

table_firefox

在 Chrome 中:

table_chrome

于 2020-11-23T13:23:10.627 回答
0

根据https://www.colorhexa.com/4daf4a,最接近“#4daf4a”的网络安全颜色是“#669933”。将边框更改为#669933 是否可以解决您的问题?

于 2020-11-17T23:55:01.283 回答