索引操作：如何一次性重新赋值多个对象？

一、同时修改多个指定位置的元素 #

你尝试的a[1][2] <- "purple" "grey"写法存在两个问题：

1. a[1]是单个元素，再取[2]不存在，会返回NA；
2. 赋值右侧没有用c()将字符串组合成向量，语法错误。

正确的做法是把要修改的位置放在一个索引向量中，右侧对应传入同长度的赋值向量：

# 初始化向量
a <- c("red", "yellow", "blue")
# 同时修改第1、2位元素
a[c(1, 2)] <- c("purple", "grey")
# 查看结果
a

执行后输出：

[1] "purple" "grey"   "blue"

如果索引向量和赋值向量长度成倍数关系，R会自动循环补齐，但建议保持两者长度一致，避免意外结果。

二、批量修改连续位置的元素 #

如果要修改第1至第5个元素为grey，可以用1:5生成连续索引，右侧直接传入单个值，R会自动将该值重复填充到所有指定位置：

# 初始化更长的向量
long_vec <- c("red", "yellow", "blue", "black", "white", "orange", "pink")
# 修改第1-5位为grey
long_vec[1:5] <- "grey"
# 查看结果
long_vec

执行后输出：

[1] "grey"   "grey"   "grey"   "grey"   "grey"   "orange" "pink"

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