knitr kable цвет текста не рендеринг - PullRequest
0 голосов
/ 17 мая 2018

Я новичок в Rmarkdown и пытаюсь сгенерировать таблицу с условным форматированием текста. Стол выходит как то что я хочу кроме цвета. Например, \ textcolor {red} {50} вместо 50 красным. Есть идеи, что я делаю не так?

В моем сценарии R:

 table2 <- data %>% filter(student == 1) %>%
           dplyr::mutate(grade = cell_spec(grade, "latex", color = ifelse(grade > 75, "blue", "red"))  

В моем файле Rmarkdown:

 ```{r, results = "asis"}
 kable(table2, format = "latex")
 ```

1 Ответ

0 голосов
/ 17 мая 2018

Ваш вопрос не воспроизводим, но, похоже, проблема в том, что вы не включили escape = FALSE в вызов kable:

library(dplyr)
library(kableExtra)
data <- data.frame(student = rep(1:5, 2), grade = sample(100, 10))
table2 <- data %>% filter(student == 1) %>%
  dplyr::mutate(grade = cell_spec(grade, "latex", 
                                  color = ifelse(grade > 75, "blue", "red"))) 
kable(table2, format = "latex", escape = FALSE)
...