我一直在尝试用希腊字母命名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$"))
非常感谢。