如何使用R formattable包更改表頭行的外觀

Question

我正在使用R中的formattable包來生成HTML表。 我可以使用格式化程序來自定義我的表格中的數據值的外觀，例如字體大小，顏色等。但是我無法弄清楚如何改變表格標題行的外觀。我可以使用col改變實際的列名稱.names（），但一直無法改變它們的外觀。

例如，在下表中，如何更改標題行中的文本顏色或背景顏色（mpg，cyl，disp等）

最后，我計划使用formattable :: as.htmlwidget（）和庫（webshot）來獲取表的圖像文件，請參閱使用Formattable包在R中導出/保存表的命令

謝謝

library(formattable)

formatRed <- formatter("span"
    , style = x ~ style(color = ifelse(x > 21 , "red", "black")))

formatSize <-  formatter("span"
    , style = x ~ style("font-size" = "8px"))

exTb <- formattable(head(mtcars, 5)
    , table.attr = "class='table table-striped'"
    , list(mpg = formatRed
        , wt = formatSize)
)

exTb

Answer 1

您可以使用樣式表。 您可以將樣式表嵌入.Rmd文件中，也可以將樣式表保存為.css文件，然后從.Rmd文件中引用它。 如果您想了解有關在.Rmd文件中嵌入樣式表的更多信息，請參閱此問題 。 如果需要有關引用外部樣式表的更多信息，請參見第3.1.4.1節 。 在我的示例中，我將樣式表（ <style>...</style>組件）嵌入到.Rmd文件中。 我的樣式表定義了樣式，可以將表格標題的字體更改為Times New Roman，將表格標題的字體顏色更改為紅色。

---
title: "Test"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

<style>
  thead {
     font-family: "Times New Roman";
     color: red;
  }
</style>

```{r, echo=FALSE}
library(formattable)
df <- data.frame(Change = c(1), My = c(2), Style = c(3))
ft <- formattable(df)
ft
```

通過擴展樣式表，您可以影響HTML文件中的其他元素。