如何將希臘字母 delta (∆) 插入到 flextable 對象的標題中？

Question

我正在使用 RMarkdown 創建一個 word 文檔（我需要輸出為 .docx 格式）。

我想使用flextable （或任何其他包）來正確格式化我的標題。

我正在嘗試讓希臘符號 delta (∆)正確顯示……這似乎是可能的，因為在此處的幫助頁面中（ https://davidgohel.github.io/flextable/articles/format.html#display-function ) 作者成功地使用 \μ 插入“μ”符號（如果我使用他的代碼，我也可以，下面），但我無法使用\∆或\Δ 讓它為 delta 工作，如果我替換 \\ u03BC 帶有以下任一代碼。 我使用的代碼生成了這個表，但我想用增量替換突出顯示的位。

這就是我嘗試時得到的結果，例如\∆ 。

有什么建議么？

library(flextable)
if( require("xtable") ){
  mat <- round(matrix(c(0.9, 0.89, 200, 0.045, 2.0), c(1, 5)), 4)
  mat <- xtable(mat)
  ft <- xtable_to_flextable(x = mat, NA.string = "-")
  print(ft$col_keys)
  ft <- flextable::display(ft, i = 1, col_key = "X1", 
    pattern = "{{val}}{{pow}}", part = "header",
    formatters = list(val ~ as.character("R"), pow ~ as.character("2") ),
    fprops = list(pow = fp_text(vertical.align = "superscript", font.size = 8))
    )
  ft <- flextable::display(ft, i = 1, col_key = "X2", 
    pattern = "{{val}}{{pow}}", part = "header",
    formatters = list(val ~ as.character("\u03BC"), pow ~ as.character("x") ),
    fprops = list(pow = fp_text(vertical.align = "superscript", font.size = 8))
    )
  ft <- flextable::display(ft, i = 1, col_key = "rowname", 
    pattern = "{{val}}{{pow}}", part = "body",
    formatters = list(val ~ as.character("y"), pow ~ as.character("t-1") ),
    fprops = list(pow = fp_text(vertical.align = "subscript", font.size = 8))
    )
  ft <- set_header_labels(ft, X3 = "F-stat", X4 = "S.E.E", X5 = "DW", rowname = "")
  ft <- autofit(ft)
  ft
}

更新

由於大衛的有用建議，我越來越接近，但是（對 flextable 不是很熟悉）當我嘗試按照建議的方式修改標題時，我得到了奇怪的行為：

library(magrittr)
library(flextable)
library(officer)
AICtable <- data.frame(Model = "test", Parameters = 9, AICc = 4000, dAICc = 0, w = 1)
v.epi.aic <- flextable(AICtable) %>% 
font(fontname = "Times New Roman", part = "all") %>% 
flextable::display(col_key = "dAICc", part = "header",
                                pattern = "{{D}}{{A}}{{cbit}}", 
                                formatters = list(D ~ as.character("D"),
                                                  A ~ as.character("AIC"),
                                cbit ~ as.character("c") ),
                                fprops = list(D = fp_text(font.family = "Symbol"),
                                              A = fp_text(font.family = "Times New Roman"),
                                cbit = fp_text(vertical.align = "subscript")))

v.epi.aic

請注意，列標題現在是重復的，並且“AIC”出現在“Δ”之前。 列名應該是：

模型、參數、AICc、ΔAICc、w（ΔAICc 中的“c”應為下標）。

Answer 1

請使用“\\u394”而不是“\Δ”來生成大寫增量符號