如何用循环按顺序替换R数据框中含‘Other’的spp字段值？

问题分析 #

你的原循环代码存在逻辑漏洞：每次循环都会重新查找所有包含"Other"的行，第一次循环就把所有目标行替换成了oth$spp[1]（即"Tink"），后续循环中grep("Other", harv$spp)会返回空向量，没有可替换的行，因此最终所有原"Other"的行都只保留了第一个替换值。

正确的循环实现 #

先提前获取所有需要替换的行索引，再按顺序逐个替换：

# 提前获取harv中所有含"Other"的行索引
other_indices <- grep("Other", harv$spp)

# 按顺序替换，确保oth的spp列长度与需要替换的行数匹配
for (i in seq_along(other_indices)) {
  harv$spp[other_indices[i]] <- oth$spp[i]
}

# 查看结果
print(harv)

执行后就能得到目标数据框：

spp number
1                             Tink      1
2                             Chii      2
3 Red Drum (a.k.a. Redfish or Red)      2
4                             Blue      4
5                              Red      5
6 Red Drum (a.k.a. Redfish or Red)      7
7                             Blue      9

更简洁的非循环实现 #

如果不需要强制用循环，R可以直接通过向量赋值完成，代码更简洁：

other_indices <- grep("Other", harv$spp)
harv$spp[other_indices] <- oth$spp

因为other_indices的长度（5）和oth$spp的长度（5）一致，R会自动按顺序一一对应替换。

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