R gt package - фоновая окраска отдельной ячейки, когда она равна определенному значению - PullRequest
Новая
       12

R gt package - фоновая окраска отдельной ячейки, когда она равна определенному значению

0 голосов
/ 03 октября 2019

Я использую gt Package из github и хотел бы закрасить фоном все записи в столбце таблицы, которые равны значению "0". Я нашел, например, следующий код в Интернете: 

# Get a palette of 8 pastel colors from
# the RColorBrewer package
pal <- RColorBrewer::brewer.pal(8, "Pastel2")

# Create lighter and darker variants
# of the base palette (one step lower, one
# step higher)
pal_darker  <- pal %>% adjust_luminance(-1.0)
pal_lighter <- pal %>% adjust_luminance(+1.0)

# Create a tibble and make a gt table
# from it; color each column in order of
# increasingly darker palettes (with
# `data_color()`)
tab_1 <-
  dplyr::tibble(a = 1:8, b = 1:8, c = 1:8) %>%
  gt() %>%
  data_color(
    columns = vars(a),
    colors = scales::col_numeric(
      palette = pal_lighter,
      domain = c(1, 8)
    )
  ) %>%
  data_color(
    columns = vars(b),
    colors = scales::col_numeric(
      palette = pal,
      domain = c(1, 8)
    )
  ) %>%
  data_color(
    columns = vars(c),
    colors = scales::col_numeric(
      palette = pal_darker,
      domain = c(1, 8)
    )
  )

tab_1

Но все эти решения, которые я нашел, касаются окрашивания диапазона ячеек разными цветами. Возможно ли использование одного цвета для отдельных ячеек в зависимости от условия?

Спасибо!

...