为数据框添加颜色

Question

有没有一种方法可以为数据框中的单元格添加颜色。例如

df
ColA   ColB
12     Pass
14     fail
12     Pass

预期的输出（ColB需要着色。如果通过，则绿色，然后是红色）

https://docs.python.org/3/library/datetime.html#strftime-and-strptime-format-codes

Answer 1

以下是使用gt软件包的方法：

library(dplyr)
library(gt)
library(scales)
df %>% 
  gt() %>%
  data_color(columns = 2, 
             colors = col_factor(palette = c("green","red"),
                                  domain = c("Pass","fail")))

Answer 2

带有datatable的选项：

library(tidyverse)
df <- tibble::tribble(
        ~ColA,  ~ColB,
          12L, "Pass",
          14L, "fail",
          12L, "Pass"
        )

library(DT)
datatable(df) %>% formatStyle(
  'ColB',
  backgroundColor = styleEqual(c("Pass", "fail"), c('red', 'green'))
)