灵活的页脚：如何在引号之间显示价值

Question

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

我将 p.value 存储为：

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

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

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

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

Answer 1

尝试

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