Как создать таблицу в rmarkdown, используя греческие буквы в заголовках столбцов?

Question

Я пытаюсь создать таблицу в rmarkdown с kable и kableExtra и хочу добавить греческие буквы в функцию add_header_above.

kable(a, format = "latex", booktabs = T, longtable = T) %>% 
kable_styling() %>%
add_header_above(c("n", "$\\alpha$", "Estimates for $\\alpha$" = 4, 
"Estimates for $\\beta$" = 4), align = "l", escape = F)

Я пытался использовать escape = F как здесь , но, похоже, это не работает для греческих букв.

Мне нужен этот стиль таблицы в моем документе rmarkdown с греческими буквами в заголовках столбцов. Есть ли способ сделать это с kable и kableExtra или даже с другим методом?

Мои данные:

a <- structure(list(c("5", "", "", "", ""), c(0.1, 0.25, 0.5, 1, 2
), MLE = c(0.0839, 0.2082, 0.4194, 0.8237, 1.6201), MME = c(0.0839, 
0.2082, 0.4194, 0.8234, 1.6147), UMLE = c(0.1048, 0.2602, 0.5242, 
1.0296, 2.0251), UMME = c(0.1048, 0.2602, 0.5242, 1.0293, 2.0183
), MLE = c(1, 1.0057, 1.0232, 1.0824, 1.2543), MME = c(1, 1.0057, 
1.0232, 1.0824, 1.2551), UMLE = c(0.9994, 1.0019, 1.0077, 1.0233, 
1.0456), UMME = c(0.9994, 1.0019, 1.0077, 1.0233, 1.0476)), .Names = c("", 
"", "MLE", "MME", "UMLE", "UMME", "MLE", "MME", "UMLE", "UMME"
), row.names = c(NA, 5L), class = "data.frame")

Answer 1

Вам просто нужно дать дополнительные побеги. Что-то в вашем конвейере съело \\ символов, поэтому вместо этого используйте \\\\:

kable(a, format = "latex", booktabs = TRUE, longtable = TRUE) %>% 
  kable_styling() %>%
  add_header_above(c("n", "$\\\\alpha$", "Estimates for $\\\\alpha$" = 4, 
                     "Estimates for $\\\\beta$" = 4), 
                   align = "l", escape = FALSE)

Это дает:

Я также изменил ваши T и F на TRUE и FALSE; это не обязательно здесь, но это хорошее оборонительное программирование.