在 R 中用彩色單元格繪制表格

Question

我正在尋找在 R 環境中用顏色填充的單元格繪制表格的方法。 有人知道如何在R中制作這種情節，如下所示。

我可以使用 ggplot2 包獲得類似的圖，但我無法擴展行和列的行。

對這個問題的任何幫助將不勝感激。

Answer 1

當涉及到 R 中的 HTML 表時，我會堅持使用knitr::kable和kableExtra組合。您可以參考此在線文檔並查看下面的示例，該示例取自文檔。

library(kableExtra)
library(formattable)

mtcars[1:5, 1:4] %>%
  mutate(
    car = row.names(.),
    mpg = color_tile("white", "orange")(mpg),
    cyl = cell_spec(cyl, angle = (1:5)*60, 
                    background = "red", color = "white", align = "center"),
    disp = ifelse(disp > 200,
                  cell_spec(disp, color = "red", bold = T),
                  cell_spec(disp, color = "green", italic = T)),
    hp = color_bar("lightgreen")(hp)
  ) %>%
  select(car, everything()) %>%
  kable(escape = F) %>%
  kable_styling("hover", full_width = F) %>%
  column_spec(5, width = "3cm") %>%
  add_header_above(c(" ", "Hello" = 2, "World" = 2))