使用qwraps2生成汇总表时标签缺失及异常值问题求助

问题现象 #

• 无法生成带完整分组标签的表格，输出仅显示统计项缩写（如min、max.1）
• DELTA_IKDC指标的min、max值显示为NA
• DELTA_IKDC的mean (sd)单元格出现异常双数值：18; 18.85 (31.71)

原因分析 #

1. 标签解析失败与重复命名：
   qwraps2默认需启用markdown格式输出选项才能保留分组标签，未设置时会自动简化标签；同时统计项重名时会自动添加后缀（如min.1），导致分组标签丢失。
2. DELTA_IKDC列类型异常：
   样本数据中DELTA_IKDC存在空值，导入时被识别为字符类型，min()/max()函数无法对字符型数据计算数值极值，因此返回NA。
3. 双数值输出根源：
   字符型列传入mean_sd()时，函数尝试强制转换数值但保留了原字符型的无效值，最终导致数值与字符值混合输出。

解决步骤 #

1. 修正数据列类型 #

先检查列类型，将DELTA_IKDC转换为数值型（空值自动转为NA）：

# 检查数据列类型
str(ACLR_CHONDRAL)

# 转换DELTA_IKDC为数值型
ACLR_CHONDRAL$DELTA_IKDC <- as.numeric(ACLR_CHONDRAL$DELTA_IKDC)

若用read_excel导入数据，可提前指定列类型避免识别错误：

ACLR_CHONDRAL <- read_excel("你的文件路径.xlsx", col_types = c("numeric", "numeric", "numeric"))

2. 启用qwraps2的markdown格式选项 #

在代码开头添加全局设置，确保分组标签正常显示：

options(qwraps2_markup = "markdown")

3. 补全统计函数的na_rm参数 #

所有min()/max()函数需添加na_rm = TRUE，避免因NA值返回无效结果：

Summary_Descriptive <-
  list("Delta Lysholm Scores" =
       list("min"       = ~ min(DELTA_LYSHOLM, na_rm = TRUE),
            "max"       = ~ max(DELTA_LYSHOLM, na_rm = TRUE),
            "mean (sd)" = ~ qwraps2::mean_sd(DELTA_LYSHOLM, na_rm = TRUE, denote_sd = "paren")),
       "Delta Tegner scores" =
       list("min"       = ~ min(DELTA_TEGNER, na_rm = TRUE),
            "max"       = ~ max(DELTA_TEGNER, na_rm = TRUE),
            "mean (sd)" = ~ qwraps2::mean_sd(DELTA_TEGNER, na_rm = TRUE, denote_sd = "paren")),
       "Delta IKDC Scores" =
       list("min"       = ~ min(DELTA_IKDC, na_rm = TRUE),
            "max"       = ~ max(DELTA_IKDC, na_rm = TRUE),
            "mean (sd)" = ~ qwraps2::mean_sd(DELTA_IKDC, na_rm = TRUE, denote_sd = "paren"))
       )

4. 用qable()输出格式化表格 #

替换直接打印的方式，使用qable()生成带完整标签的markdown表格：

Final_Descriptive <- summary_table(ACLR_CHONDRAL, Summary_Descriptive)
qable(Final_Descriptive)

预期修正结果 #

• 表格显示完整分组标签（如Delta Lysholm Scores）
• DELTA_IKDC的min为0，max为88
• mean (sd)单元格显示正常单值（如18.85 (31.71)）

内容的提问来源于stack exchange，提问作者Ahmed Mabrouk