我是新手，我的问题可能是你们中许多人能想象到的最简单的问题。尽管如此，我还是被困住了，并且一直在到处寻找答案，所以请帮忙。我正在编写一个简单的循环，由一个“for”和一个“if”语句组成，评估一个简单的向量。我不断得到错误的结果，我不知道问题出在哪里。代码如下：
Y <- c(3,5,2,7)
for (n in Y) {
if (n < 6) (Y[n]=0)
}
评估时，结果是：3 0 0 7 0，这不是我所期望的！该代码应该评估 Y 中的每个项目，如果它小于 6，则返回 0。所以它应该是：0 0 0 7。我做错了什么？请帮忙！
【问题讨论】：
Y[Y <6] = 0
标签： r loops for-loop if-statement
当您执行for (n in Y) 时，实际上是在迭代数组的元素，因此当您尝试更改 Y 的值时，您并没有传递索引，而是传递了值。
你需要做这样的事情（不知道你用的是哪种语言）：
Y <- c(3,5,2,7)
for (n in 1:length(Y)) {
if (Y[n] < 6) (Y[n]=0)
}
使用您的原始代码发生的事情是：
if (3 < 6) (Y[3]=0) --it changes position 3
if (5 < 6) (Y[5]=0) --it adds a 0 to position 5
if (2 < 6) (Y[2]=0) --it changes position 2
if (7 < 6) (Y[7]=0) --nothing happens
【讨论】：
Y，所以这相当于Y[3] = 0; Y[5] = 0; Y[2] = 0。 Y[1] 和 Y[4] 保持不变。
if (3 < 6) (Y[3]=0) --it changes position 3 if (5 < 6) (Y[5]=0) --it adds a 0 to position 5 if (2 < 6) (Y[2]=0) --it changes position 2 if(7 < 6) (Y[7]=0) --nothing happens
由于 R 是一种矢量化语言，所以很少需要 for 循环，尤其是对于基本操作。熟悉 R 的向量特征可以节省大量的打字（和头痛）。因此，为了替换 Y 中小于 6 的所有值，我们可以编写
Y[Y < 6] <- 0
Y
[1] 0 0 0 7
这里，Y < 6 返回满足条件的Y 元素的逻辑向量
[1] 真真真假
然后将其用于子集。
此外，R 有 replace() 函数，同样可以使用：
replace(Y, Y < 6, 0)
[1] 0 0 0 7
【讨论】：