r语言 - 在for循环中有条件地更新值

Question

我想知道为什么我不能用for循环复制第一个例子。更具体地说，您可以看到，如果我们尝试使用for循环执行逻辑，则第二行和第三行不会填充新值。为什么会这样?

复制示例:

df <- data.table(name=c('a', 'b', 'c'))
df[name=='a', x:=1]
df[name=='b', x:=2]
df[name=='c', x:=3]
df
####
df <- data.table(name=c('a', 'b', 'c'))
values <- unique(df$name)
for (x in 1:3) {
df[name==values[x], x:=x]
}
df

我输出:

> df <- data.table(name=c('a', 'b', 'c'))
> df[name=='a', x:=1]
> df[name=='b', x:=2]
> df[name=='c', x:=3]
> df
name x
1:    a 1
2:    b 2
3:    c 3
> df <- data.table(name=c('a', 'b', 'c'))
> values <- unique(df$name)
> for (x in 1:3) {
+   df[name==values[x], x:=x]
+ }
> df
> df
name  x
1:    a  1
2:    b NA
3:    c NA

Answer 1

这是一个作用域问题，循环的第一步定义了x，随后的步骤使用这个定义(对于第2行和第3行，它等于NA)。

如果你使用i而不是x，它可以工作:

for (i in 1:3) {
df[name==values[i], x:=i]
}
df
Index: <name>
name     x
<char> <int>
1:      a     1
2:      b     2
3:      c     3