dplyrチェーン内でデータフレームを自分自身に参加させるにはどうすればよいですか？

Question

時々、私は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')) 

これを試してみると、Error in is.data.frame(y) : argument "y" is missing, with no defaultとなります。

Answer 1

問題は、ドットを使用すると左端がちょうど動くので、上に書いたように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') 
) 

をこの方法で、あなたはleft_join()の両方の引数にLHSを渡すのではなくあなたのようmagrittrの暗黙のLHSに頼っています通常はそうです。