在FLEXR表格中，复杂符号可以出现在列标题中吗

使用

flextable

创建一个表，我希望列标题是pi（带帽子）和I下标。使用

flextable

6i，我可以使用

compose（）

函数为标题添加基本格式。我可以很容易地得到圆周率，但我不知道如何把帽子盖在圆周率上

test <- data.frame(hat_pi_i= c(0.1, 0.9))

# devtools::install_github("davidgohel/flextable")  # version 6.x
# devtools::install_github("davidgohel/officer")  # for flextable 6 to work

library(flextable)
# compose conflicts with purrr & igraph
flextable(test) %>% 
  compose(part = "header", j = "hat_pi_i", 
          value = as_paragraph("hat π", as_sub("i"))) 

test%
撰写（part=“header”，j=“hat\u pi\u i”，
值=as_段落（“hatπ”，as_sub（“i”））

---

是否可以调整上面的标题，将帽子放在pi上，而不是旁边的一个单词？

有一种黑客方法：

flextable(test) %>% 
  compose(part = "header", j = "hat_pi_i", 
          value = as_paragraph("\U1D70B\U0302", as_sub("i"))) 

这使用Unicode字符：

\U1D70B

是数学样式pi，

\U0302

表示在前一个字符上加一个扬抑符。您也可以使用

π

执行第一个字符，但它看起来不太好，因为（至少在我的系统上）扬抑符最终放错了位置：

---

谢谢。在我的机器上渲染得很漂亮。