R语言pivot_wider转换时报错Can't convert <double> to <list>如何解决

报错核心原因 #

你的数据存在同一站点+同一物种的重复观测行，pivot_wider无法直接确定多个重复值的合并规则才触发报错。

第一步：定位重复记录 #

执行以下代码查看所有重复的站点+物种组合：

chalut_lg %>%
  count(station, espece, sort = TRUE) %>%
  filter(n > 1)

第二步：根据业务需求处理重复值 #

情况1：重复行是录入/计算错误，同一站点同一物种仅需保留唯一值 #

先对数据去重后再转宽表：

# 去重：同一station+espece组合仅保留第一条记录
chalut_lg_clean <- chalut_lg %>%
  distinct(station, espece, .keep_all = TRUE)

# 转宽表
chalut_large <- chalut_lg_clean %>%
  pivot_wider(
    names_from = espece,
    values_from = freq_rel,
    values_fill = 0
  )

情况2：重复行是同一站点同一物种的多次采样结果，需要聚合后保留 #

直接在pivot_wider中指定聚合规则（可根据需求替换为sum/median等函数）：

chalut_large <- chalut_lg %>%
  pivot_wider(
    names_from = espece,
    values_from = freq_rel,
    values_fill = 0,
    values_fn = mean # 对重复值取均值
  )

原参数报错原因解释 #

你之前设置values_fn=list仍报错的原因是：values_fill=0是数值型，和list生成的列表列类型不兼容，程序无法把数值0填充到列表类型的单元格中，因此触发类型转换报错。

内容的提问来源于stack exchange，提问作者Virginie Chalifoux