在表头 R Markdown html 输出中显示带有数学符号的 data.frame

Question

假设我想在 R Markdown 文件（html 输出）中显示来自多个方程的系数表。

我希望表格看起来像这样：

但我终生无法弄清楚如何告诉 R Markdown 解析表中的列名。

我得到的最接近的是使用 cat 从我的 data.frame 打印自定义表的 hacky 解决方案......不理想。有没有更好的方法来做到这一点？

这是我如何创建上面的图像，将我的文件保存为 RStudio 中的 .Rmd。

---
title: "Math in R Markdown tables"
output:
  html_notebook: default
  html_document: default
---

My fancy table

```{r, echo=FALSE, include=TRUE, results="asis"}
# Make data.frame
mathy.df <- data.frame(site = c("A", "B"), 
                       b0 = c(3, 4), 
                       BA = c(1, 2))

# Do terrible things to print it properly
cat("Site|$\\beta_0$|$\\beta_A$")
cat("\n")
cat("----|---------|---------\n")

for (i in 1:nrow(mathy.df)){
  cat(as.character(mathy.df[i,"site"]), "|", 
      mathy.df[i,"b0"], "|", 
      mathy.df[i,"BA"], 
      "\n", sep = "")
}
```

Answer 1

您可以使用kable() 及其escape 选项来格式化数学符号（有关相关问题，请参阅this answer）。然后将数学标题指定为列名，然后就可以了：

---
title: "Math in R Markdown tables"
output:
  html_notebook: default
  html_document: default
---

My fancy table

```{r, echo=FALSE, include=TRUE, results="asis"}
library(knitr)

mathy.df <- data.frame(site = c("A", "B"), 
                       b0 = c(3, 4), 
                       BA = c(1, 2))

colnames(mathy.df) <- c("Site", "$\\beta_0$", "$\\beta_A$")

kable(mathy.df, escape=FALSE)
```