如何将希腊字母 delta (?) 插入到弹性对象的标头中?

Nov*_*ova 5 unicode r ms-word flextable r-markdown

我正在使用 RMarkdown 创建一个 Word 文档(我需要输出为 .docx 格式)。

\n\n

我想使用flextable(或任何其他包)来正确格式化我的标题。

\n\n

我正在尝试让希腊符号 delta (\xe2\x88\x86)正确显示......这似乎是可能的,因为在此处的帮助页面中(https://davidgohel.github.io/flextable/articles/format .html#display-function)作者成功使用 \\u03BC 插入“\xce\xbc”符号(如果我使用他的代码,我也可以,如下),但我无法让它为 delta 工作使用\\u2206\\u0394,如果我用下面的代码替换 \\u03BC 。我正在使用的代码生成此表,但我想用增量替换突出显示的位。

\n\n

在此输入图像描述

\n\n

这就是我尝试时得到的结果,例如\\u2206

\n\n

在此输入图像描述

\n\n

有什么建议么?

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

更新

\n\n

感谢 David 的有用建议,我越来越接近了,但是(不太熟悉 flextable)当我尝试按照建议的方式修改标题时,我遇到了奇怪的行为:

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

请注意,列标题现在已重复,并且“AIC”出现在“\xe2\x88\x86”之前。列名称应该是:

\n\n

模型、参数、AICc、\xe2\x88\x86AICc、w(\xe2\x88\x86AICc 中的“c”应该是下标)。

\n\n

在此输入图像描述

\n

小智 2

请使用“\u394”而不是“\u0394”来生成大写增量符号