如何在回归模型中自动以非科学计数法显示p值？

云上老周

2026-7-24

让回归模型p值自动以非科学计数法显示的方法

你可以通过两种实用方式实现自动转换，无需每次手动处理：

1. 修改全局数字显示设置

在脚本开头添加全局选项配置，让所有统计输出默认使用非科学计数法：

# 禁用科学计数法，保留6位小数（可按需调整位数）
options(scipen = 999, digits = 6)

设置完成后，后续运行coef(summary(fit))等代码时，p值会自动以常规小数格式输出。

2. 自定义函数格式化模型结果

如果不想改动全局设置，可编写自定义函数专门处理模型的p值显示：

# 自定义函数：格式化svyglm结果，将p值转为非科学计数法
format_svyglm_p <- function(fit) {
  result_table <- coef(summary(fit))
  # 针对p值列进行格式转换
  result_table[, "Pr(>|z|)"] <- format(result_table[, "Pr(>|z|)"], 
                                       scientific = FALSE, digits = 6)
  return(result_table)
}

# 使用示例
fit <- svyglm(married ~ treat, design = d.w, family="poisson") 
format_svyglm_p(fit)

该函数仅处理目标模型的结果，不会影响其他输出的格式。