tbl_regression中p值格式设置：≥0.001留3位小数，<0.001显示<0.001

要实现≥0.001的p值保留3位小数、<0.001显示为<0.001的需求，你需要自定义一个p值格式化函数，替代默认的格式化逻辑，具体操作如下：

1. 定义符合需求的p值格式化函数

# 自定义p值格式化逻辑
custom_p_format <- function(x) {
  ifelse(x < 0.001, "<0.001", style_number(x, digits = 3))
}

2. 在tbl_regression中调用该函数作为pvalue_fun参数

t1 <- tbl_regression(
  model, 
  tidy_fun = tidyWaldCI, 
  exponentiate = TRUE, 
  pvalue_fun = custom_p_format
) %>%
  bold_p()

补充说明 #

• 函数里的style_number(., digits=3)会强制保留3位小数（比如0.023、0.120这类格式）；如果你偏好有效数字格式（比如0.12会显示为0.12而非0.120），可以把style_number替换为style_sigfig(., digits=3)。
• 该逻辑会自动对所有p值做判断，既满足极小值的特殊显示，也保证常规p值的三位小数格式。

内容的提问来源于stack exchange，提问作者flailing-in-r