r - Flextable 页脚：如何在引号之间显示值

Question

我正在创建一个弹性表来显示一些结果。为了澄清一些数据，并添加一些数据，我想在 flextable 中将其放在页脚中。

我将 p.value 存储为：

pset1 <- chisq.test(set1)$p.value

我想在页脚中显示 pset1 的结果，例如：

  add_footer(rowname = c("(Waarde) = expected waarde
P-value = [pset1]")) %>% 

flextable 中的页脚需要以 " 开头并且需要以 " 结尾才能正常工作。但是如何在这个字符串中显示值“pset1”？

标签： rfooterquotesflextable

Answer 1

尝试

add_footer(rowname = c(paste0("(Waarde) = expected waarde
P-value = [", pset1, "]"))) %>%