如何在dplyr链中将数据框连接到自身?

偶尔,我需要在dplyr链中将数据框加入到(通常是修改过的)版本中.像这样的东西:

df  <- data.frame(
     id = c(1,2,3)
   , status = c('foo','bar','meh')
   , spouseid = c(4,3,2)
)


df %>% 
  filter( status == 'foo' | status == 'bar') %>% 
  # join the filtered table to itself using the dot as the right-hand side
  left_join(., by = c('id' = 'spouseid'))

当我尝试这个时,我在is.data.frame(y)中得到错误:缺少参数“y”,没有默认值.

最佳答案
问题是使用点只是左手边移动,所以上面写的方式只将lhs传递给left_join().要在左侧和右侧使用点,请使用点两次:

df %>% 
  filter( status == 'foo' | status == 'bar') %>% 
  # the first dot is x argument and the second dot is the y argument
  left_join(
      x = . 
    , y = . 
    , by = c('id' = 'spouseid')
  )

这样,你将lhs传递给left_join()的两个参数,而不是像往常那样依赖magrittr的隐式lhs.

转载注明原文:如何在dplyr链中将数据框连接到自身? - 代码日志