将希腊字母作为姓氏传递给kable

时间:2018-10-02 14:02:57

标签: latex r-markdown letter kable

我一直在尝试用希腊字母命名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,并通过knit选项编写表头,如下所示:

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:Here is the link to the issue on rmarkdown GitHub

0 个答案:

没有答案