Передача греческих букв как названий в kable - PullRequest
0 голосов
/ 02 октября 2018

Я пытался назвать столбцы фрейма данных R греческими буквами, чтобы вызвать kable и получить латексную выходную таблицу с именами заголовков в виде этих греческих букв.В результате kable не распознает имена столбцов так, как пишутся латексные греческие буквы, или аргументы не передаются функции в правильном формате.

A <- t(as.data.frame(seq(1:4)))
colnames(A) <- c("$\\\\alpha$", "$\\\\beta$", "$\\\\delta$", "$\\\\gamma$")
A %>%
  kable(.,"latex", escape = F, booktabs = T, linesep = "", align = "c")

Есть ли способ сделать это заранее?

Лучшее решение, которое я нашел на данный момент, - установить для имен столбцов фрейма данных значение NULL и записать заголовки таблиц из параметров вязания следующим образом:

A <- t(as.data.frame(seq(1:4)))
colnames(A) <- NULL
A %>%
  kable(., "latex", escape = F, booktabs = T, linesep = "", align = "c") %>% 
  add_header_above(c("$\\\\alpha$", "$\\\\beta$", "$\\\\delta$", "$\\\\gamma$"))

Но этопуть довольно запутанный и не хватает автоматизации.

Наконец я попробовал следующее, и это тоже не сработало.

A <- t(as.data.frame(seq(1:4)))
A %>%
  kable(., "latex", escape = F, booktabs = T, linesep = "", align = "c", col.names = c("$\alpha$", "$\beta$", "$\delta$", "$\gamma$"))

Большое спасибо.

PD: Вот ссылка на вопрос по rmarkdown GitHub

...