R语言：如何通过关联数据框替换df1的Age编码为分组值

问题根源 #

你遇到的核心问题是替换后的Age列意外变成了列表类型（而非普通向量），导致写入CSV时出现c(Minor, ....)这类格式，同时head()无法正常解析显示。另外，若df2$Value是因子类型，也可能引发编码异常。

分步解决方案 #

1. 先排查数据类型 #

执行以下代码确认替换后Age列的类型：

class(df1$Age)
str(df1$Age)

若输出显示为list，则验证了列表列的问题。

2. 修正替换代码 #

方案一：Base R 向量提取（推荐）

原代码中df2[match(df1$Age,df2$Code),"Value"]若操作的是tibble，会返回单列数据框（本质是列表），改成直接提取向量即可：

df1$Age <- df2$Value[match(df1$Age, df2$Code)]

方案二：用dplyr关联替换（更直观）

如果习惯用tidyverse工具，left_join的方式更不易出错：

library(dplyr)
df1 <- df1 %>%
  left_join(df2, by = c("Age" = "Code")) %>%  # 按编码匹配分组值
  select(-Age) %>%  # 删除原编码列
  rename(Age = Value)  # 将分组值列重命名为原列名

3. 处理编码与类型转换 #

若df2$Value是因子类型，转成字符型并指定编码保存：

# 将因子转成字符型
df1$Age <- as.character(df1$Age)
# 写入CSV时指定UTF-8编码避免乱码
write.csv(df1, "output.csv", fileEncoding = "UTF-8", row.names = FALSE)

4. 验证结果 #

执行以下代码确认数据恢复正常：

head(df1, 10)
summary(df1$Age)

若能正常输出前10行数据，说明问题已解决。

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