R语言：如何按组合并数据框中置信区间列的相邻单元格

原代码问题分析 #

你写的pivot_wider代码参数错误，且逻辑不符合需求：

• pivot_wider核心参数为names_from（指定生成新列名的列）和values_from（指定填充新列的值来源），你漏写了names_from
• 你的需求是合并同一Group下的置信区间值，而非处理Proportion1列，原代码的参数指向完全错误

正确解决方案 #

假设你的数据框结构如下（同一Group对应两行CI值，分别为上下限）：

方法一：直接分组合并（推荐） #

用dplyr的分组+汇总功能，一步完成合并：

library(dplyr)

df_cleaned <- df %>%
  # 按Group和Proportion1分组（同一Group的Proportion1值应一致）
  group_by(Group, Proportion1) %>%
  # 排序CI值，确保下限在前、上限在后
  arrange(`Confidence Interval1`) %>%
  # 合并成"下限 - 上限"格式，同时取消分组
  summarize(`Confidence Interval1` = paste(first(`Confidence Interval1`), last(`Confidence Interval1`), sep = " - "),
            .groups = "drop")

方法二：先宽展再合并 #

如果需要先区分上下限列再合并，可以用pivot_wider配合后续处理：

library(dplyr)
library(tidyr)

df_cleaned <- df %>%
  group_by(Group, Proportion1) %>%
  # 标记CI值是下限还是上限
  mutate(ci_type = ifelse(`Confidence Interval1` == min(`Confidence Interval1`), "lower", "upper")) %>%
  # 转宽表，生成lower和upper列
  pivot_wider(names_from = ci_type, values_from = `Confidence Interval1`) %>%
  # 合并成目标格式
  mutate(`Confidence Interval1` = paste(lower, upper, sep = " - ")) %>%
  # 删掉中间列并取消分组
  select(-lower, -upper) %>%
  ungroup()

内容的提问来源于stack exchange，提问作者Claire.kzh