在R语言中匹配两个DataFrame的age列，为df新增标记列

你的代码存在两个问题：一是df$age == df1$age属于逐元素循环比较，由于两个数据框的age列长度不一致，会产生错误的匹配结果；二是语法存在括号不匹配的错误。

以下是两种正确的实现方式：

方法1：%in% + ifelse组合 #

%in%运算符可以精准判断向量中的每个元素是否存在于目标集合中，配合ifelse能将逻辑结果转换为1/0：

# 新增value列
df$value <- ifelse(df$age %in% df1$age, 1, 0)

方法2：直接转换逻辑值为整数 #

R中TRUE等价于1，FALSE等价于0，因此可以直接用as.integer()转换逻辑判断结果，代码更简洁：

df$value <- as.integer(df$age %in% df1$age)

运行任意一种方法后，df的结果都会符合预期：

name age value
1  CARL   3     1
2  JACK   2     0
3   TOM   1     0
4  JOHN   5     0
5   TIM   9     1
6   SAM   8     0

额外说明 #

如果你的age列存在字符型与数值型混合的情况，需要先统一数据类型再判断，示例代码如下：

df$value <- as.integer(as.numeric(df$age) %in% as.numeric(df1$age))

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