Можно ли комбинировать форматирование со строкой kableextra?

Другим опрятным и простым решением является внутренняя функция recursivePackageDependencies из библиотеки packrat. Однако пакет должен быть установлен в некоторой библиотеке на вашем компьютере. Преимущество заключается в том, что он работает с самодельными пакетами, отличными от CRAN. Пример:

packrat:::recursivePackageDependencies("ggplot2",lib.loc = .libPaths()[1])

:

 [1] "R6"           "RColorBrewer" "Rcpp"         "colorspace"   "dichromat"    "digest"       "gtable"      
 [8] "labeling"     "lazyeval"     "magrittr"     "munsell"      "plyr"         "reshape2"     "rlang"       
 [15] "scales"       "stringi"      "stringr"      "tibble"       "viridisLite" 
0
задан VictorNautica 16 January 2019 в 16:10
поделиться

1 ответ

Вы можете извлечь строки в цикле и запустить color_tile() для них.

library(tidyverse)
library(knitr)
library(kableExtra)
library(formattable)

set.seed(1)
df <- data.frame(letters = letters[1:5],
           foo = rnorm(5, 20),
           bar = rnorm(5, 20),
           baz = rnorm(5, 20),
           bash = rnorm(5, 20),
           stringsAsFactors = FALSE)

for(i in 1:nrow(df)) df[i,] <- color_tile("pink", "lightblue")(df[i,])

df %>%
  kable(escape = F) %>%
  kable_styling("hover", full_width = F) %>%
  column_spec(5, width = "3cm") %>%
  add_header_above(c(" ", "Hello" = 2, "World" = 2))
0
ответ дан anotherfred 16 January 2019 в 16:10
поделиться
Другие вопросы по тегам:

Похожие вопросы: