如何在 flextable 中包含符号?

How to include symbols in flextable?

问题

我想在 flextable 中包含表示参数的符号。下面是一个例子:

library(flextable)


params_names <- c("T", "A_i", "b", "delta", "s_0")


params_values <- c(0.97, 3.83, 2.83, 1.29, 1.07)



data_tab <- data.frame(Parameter = params_names,
                       Value = params_values)


ft <- flextable(data_tab)

当前输出

期望的输出

我在 Word 中创建了以下所需的输出:

我试过的

我尝试使用 latex2exp 包中的 Tex 函数,以及 flextable 包中的 mkpar 函数。但是我没有得到想要的输出。请指导我如何将当前输出更改为所需的输出?

这是一个解决方案:

library(flextable)
# equatags::mathjax_install()
params_names <- c("T", "A_i", "b", "\Delta", "s_0")
params_values <- c(0.97, 3.83, 2.83, 1.29, 1.07)

data_tab <- data.frame(Parameter = params_names,
                       Value = params_values)

ft <- flextable(data_tab)
ft <- compose(ft, j = "Parameter", value = as_paragraph(as_equation(Parameter)))
ft