gridExtra表列标题中的数学符号

我需要在两个列标题上写入大于或等于数学符号，并打印一个gridExtra表，但无法使其工作。下面是一个小的Rmarkdown文档，显示了我正在尝试做的事情。我仍然在使用GridExtra0.9.1，因为我所有的表都可以很好地使用这个版本

    ---
    title: "Math symbols in column headers"
    date: "January 15, 2020"
    output: pdf_document
    ---

    ```{r}
    library(gridExtra)

    a <- structure(list(MLE = c(0.0839, 0.2082, 0.4194, 0.8237, 1.6201
    ), MME = c(0.0839, 0.2082, 0.4194, 0.8234, 1.6147)), class = "data.frame", row.names = c(NA, 
    5L)) 

    colnames(a) <- c("Estimated abundance of\n White Sharks\n $\\\\geq$ 40 inches in total length","Percentage of 3 year old\n White shark in the population\n $\\\\geq{40}$ inches in total length")

      grid.table(a)

```

---
标题：“列标题中的数学符号”
日期：“2020年1月15日”
输出：pdf\U文件
---
```{r}
图书馆（gridExtra）
a添加一个带有
t主题默认值（colhead=list（fg\u params=list（parse=TRUE））的主题
，以便在列标题中使用plotmath表示法


Rmarkdown
---
标题：“列标题中的数学符号”
日期：“2020年1月15日”
输出：pdf\U文件
---
```{r，echo=FALSE}
图书馆（gridExtra）
a=总长度为40英寸）
tt使用
“…\u2265 40英寸…”
@Roland，你用我的例子做了吗？我这边的打印仍然不正确。实际上，它起了部分作用\u2265代表“=”号，但我需要“等于或大于”号。有什么地方可以找到这些吗？显然，我没有费心创建一个降价文档，但是我用你的R代码测试了它，它工作了。如果它不适合您，您可能会在标记时遇到编码问题。可能，您需要设置一些选项，以确保UTF-8用作编码。它似乎在R控制台中用作表达式，但在Rmarkdown文档中显示为“=”。它似乎在html文档中按预期工作，但在pdf文档中不起作用；谢谢你的建议。它与新版本的gridExtra配合得很好，但不幸的是，它与我正在使用的gridExtra版本（0.9.1）不配合。我没有更新到新版本，因为我的所有报告都包含多个使用旧版本生成的表，并且不适用于新版本。我仍然在使用一些格式，比如：tableGrob（format（x），gpar.corefill=gpar（fill=“lightblue”，alpha=0.3，col=“grey90”），h.even.alpha=0.2，show.rownames=FALSE），这在新版本中似乎不起作用。
---
title: "Math symbols in column headers"
date: "January 15, 2020"
output: pdf_document
---

```{r, echo = FALSE}
library(gridExtra)

a <- data.frame(
  MLE = c(0.0839, 0.2082, 0.4194, 0.8237, 1.6201),
  MME = c(0.0839, 0.2082, 0.4194, 0.8234, 1.6147)
)

colnames(a) <- c(bquote(atop("Estimated abundance of White Sharks", "" >= 40 ~ "inches in total length")), 
                 bquote(atop("Percentage of 3 year old White Sharks", "" >= 40 ~ "inches in total length"))) 

tt <- ttheme_default(colhead=list(fg_params = list(parse=TRUE)))
grid.table(a, theme=tt)
```