Команды kableExtra :: LaTeX неправильно отображаются в add_header_above

Question

Я хочу использовать LaTeX команды в add_header_above функции kableExtra

library(kableExtra)

x1 <- knitr::kable(head(mtcars), "html")
add_header_above(x1, c(" ", "Group 1" = 5, "Group 2" = 6))
add_header_above(x1, c(" ", "\\alpha" = 5, "Group 2" = 6))

x2 <- knitr::kable(head(mtcars), "latex")
add_header_above(x2, c(" ", "Group 1" = 5, "Group 2" = 6))
add_header_above(x2, c(" ", "\\alpha" = 5, "Group 2" = 6))

Однако команда LaTeX \\alpha не обрабатывается должным образом.Любое решение, пожалуйста.

Отредактировано

Test2 <- c(" ", مواطنين = "5", `غير مواطنين` = "6")
Test3 <- c(`\textarabic{}` = " ", `\textarabic{مواطنين}` = "5", 
`\textarabic{غير مواطنين}` = "6")

add_header_above(x1, Test2, escape = FALSE)

add_header_above(x1, Test3, escape = FALSE)

Answer 1

Вы можете использовать escape = FALSE:

add_header_above(x2, c(" ", "$\\\\alpha$" = 5, "Group 2" = 6), escape = FALSE)