如何摆脱 R 中 gtsummary 包创建的表中的前导零?

how to get rid of leading zeros in the tables created by gtsummary package in R?

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

使用参数 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 (v2.0.0)

于 2021-07-09 创建