基于无共同标识的不等长数据框生成新变量问题求助

给定两个不等长的数据框：

A <- data.frame(x = 1:15, y=letters[1:15])
B <- data.frame(k = 1:4, w=letters[1:4])

需求是给数据框A新增一列Z，规则为：当A的y列值存在于B的w列中时，Z取1，否则取0。

问题分析与解决方案 #

你尝试的代码逻辑本身没问题，大概率是未加载dplyr包导致运行失败，或是你实际需要数值型的1/0而非字符串类型。以下提供两种可行方案：

方案1：使用dplyr包（修正你的代码）

先确保已加载dplyr包，再执行代码：

library(dplyr)

A <- A %>%
  mutate(
    Z = if_else(y %in% B$w, 1, 0) # 若需要字符串类型结果，保留'1'/'0'即可
  )

方案2：基础R实现（无需额外包）

如果不想依赖第三方包，直接用基础R的方式更简洁：

# 方法一：用transform函数
A <- transform(A, Z = as.integer(y %in% B$w))

# 方法二：直接赋值新增列
A$Z <- as.integer(A$y %in% B$w)

这里as.integer()会自动把逻辑判断的TRUE转为1，FALSE转为0，一步完成需求。

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