替换数组的前m个元素

Question

我有一个长度为n的数组。我想将其前m<n个元素替换为0。显然，一个简单的for循环可以执行此任务：

m<-100
n<-1000
x<-runif(n)
for(i in 1:m){
  x[i]<-0
}

有没有更有效的解决方案？谢谢！

Answer 1

如果'm'是元素的索引，请使用

replace(x, 1:m, 0)

或

x * rep(c(0, 1), c(m, n - m))

或

x * (seq_len(n) > m)

编辑：基于@RuiBarradas评论