r - 如何摆脱 R 中 gtsummary 包创建的表中的前导零？

Question

我想知道是否有一种简单的方法可以去除由 R 中的 gtsummary 包创建的回归表中的前导零？我喜欢这个包的功能，但不确定是否有一种简单的方法来格式化表格以符合 APA 指南(例如，p 值没有前导零)？谢谢!

Answer 1

使用参数 tbl_regression(pvalue_fun=) 更改 p 值的舍入和格式化方式。示例如下!

library(gtsummary)
packageVersion("gtsummary")
#> [1] '1.4.1'

# formatting function for p-values that removes leading 0
apa_pvalues <- function(x) {
  style_pvalue(x, digits = 2) %>%
    stringr::str_replace("0.", ".")
}

tbl <- 
  lm(marker ~ age + grade, trial) %>%
  tbl_regression(pvalue_fun = apa_pvalues)

^{由 reprex package 创建于 2021-07-09 (v2.0.0)}