如何将R语言向量中每隔一个元素修改为同一值？

方法1：直接用索引批量修改（最简洁高效） #

R是向量化语言，直接通过索引定位要修改的元素就行，完全不用循环。比如要把第2、4、6...这些偶数位置的元素改成2：

vector <- c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
# 生成从2开始、步长为2的索引序列，批量赋值
vector[seq(2, length(vector), by = 2)] <- 2

执行后vector就变成你要的c(1,2,1,2,1,2,1,2,1,2)。

方法2：直接生成目标向量 #

如果你的初始向量本来就是全1的，甚至可以跳过修改步骤，直接生成交替序列：

# 重复c(1,2)直到总长度为10
vector <- rep(c(1,2), length.out = 10)

关于for循环是不是最佳方案 #

绝对不是。R的优势就是向量化操作，向量化代码比for循环简洁得多，而且处理大向量时速度快很多——for循环是逐元素操作，在R里效率很低。如果非要用for循环硬写，代码是这样的：

vector <- c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
for (i in seq(2, length(vector), by = 2)) {
  vector[i] <- 2
}

但真的没必要这么折腾，前面的向量化方法香多了。

扩展：实现每隔2个元素修改（比如第3、6、9位） #

如果要修改的是每隔2个的位置（步长为3，从第3位开始），同样用索引方法：

vector <- c(1,1,1,1,1,1,1,1,1,1)
# 从3开始，步长3，把这些位置改成3
vector[seq(3, length(vector), by = 3)] <- 3
# 结果是 c(1,1,3,1,1,3,1,1,3,1)

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