R:* _join(dplyr)的标准评估 [英] R: Standard evalation for *_join (dplyr)
问题描述
如果连接变量名不同并存储在另一个变量中,那么如何使用* _join()从dplyr中连接2个表?
How to join 2 tables using *_join() from dplyr, when the join variable names are different and stored in another variable?
eg
df1 = data_frame(x1 = 1:10,y1 = 21:30)
df2 = data_frame(x2 = 6:15,y2 = 26:35)
df3 = data_frame(x1 = 6:15,y2 = 26:35)
var1 = "x1"
var2 = "x2"
df1 %>% left_join(df3,by=c(var1)) # #1 works
但这会给出错误 -
but this gives error -
df1 %>% left_join(df2,by=c(var1 = var2)) # #2 doesn't work
Error: cannot join on columns 'x2' x 'var1': index out of bounds
令人惊讶的是,这个工作 -
surprisingly, this works -
df1 %>% left_join(df2,by=c("x1" = var2)) # #3 works
推荐答案
这里的问题是,如果公共列在data.frames中具有不同的名称,则必须提供一个命名向量。看看你的例子会发生什么:
The problem here is that you have to supply a named vector if the common column has different names in the data.frames. See what happens in your example:
直接提供名称时,它可以工作:
It works when you supply the names directly:
df1 %>% left_join(df2, by = c("x1" = "x2"))
#Source: local data frame [10 x 3]
#
# x1 y1 y2
#1 1 21 NA
#2 2 22 NA
#3 3 23 NA
#4 4 24 NA
#5 5 25 NA
#6 6 26 26
#7 7 27 27
#8 8 28 28
#9 9 29 29
#10 10 30 30
您提供的命名矢量是:
c("x1" = "x2")
# x1
#"x2"
现在,如果您使用字符向量,则命名向量将更改为:
Now if you use character vectors, the named vector changes to:
var1 = "x1"
var2 = "x2"
c(var1 = var2)
#var1 # <~~ this is why it doesn't work
#"x2"
我不知道目前在dplyr中是否有一个干净的方法来解决这个问题。解决方法是根据需要进行以下调整以构造命名向量:
I don't know if there's a "clean" way to solve this in dplyr currently. A workaround is the following tweak to construct the named vector as required:
df1 %>% left_join(df2, by = setNames(var2, var1))
#Source: local data frame [10 x 3]
#
# x1 y1 y2
#1 1 21 NA
#2 2 22 NA
#3 3 23 NA
#4 4 24 NA
#5 5 25 NA
#6 6 26 26
#7 7 27 27
#8 8 28 28
#9 9 29 29
#10 10 30 30
这是因为:
setNames(var2, var1)
# x1
#"x2"
希望有帮助。
注意:你可以这样做: name < - $ / code>
Note: you could do the same with names<-
like so:
df1 %>% left_join(df2, by = `names<-`(var2, var1))
,但Hadley建议使用 setNames
方法。
but Hadley recommends using the setNames
approach instead.
这篇关于R:* _join(dplyr)的标准评估的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!