R : 파이프 %> % 및 자리 표시 자

Question

을 사용하여 선택 항목을 추가로 하위 집합으로 만들었습니다. 파이프 연산자가 %>% 인 것으로 확인되어 코드를보다 쉽게 ​​읽을 수 있습니다. 여기 내 MWE입니다.

library(dplyr)           # for the pipe operator 
library(lsr)           # for the cohensD function 

set.seed(4)            # make it reproducible 
dat <- data.frame(          # create data frame 
    subj = c(1:6), 
    pre = sample(1:6, replace = TRUE), 
    post = sample(1:6, replace = TRUE) 
) 

dat %>% select(pre, post) %>% sapply(., mean)   # works as expected 

그러나,이 특정한 경우

dat %>% select(pre, post) %>% cohensD(.$pre, .$post) # piping returns an error 
cohensD(dat$pre, dat$post)        # classical way works fine 

왜 $와 조합 . 지정자를 사용하는 열을 서브 세트 불가능에 파이프 연산자를 사용 고투? 파이프 연산자 %>%을 사용하여이 행을 작성하는 것이 좋습니까? 아니면 구문이 복잡합니까? 이것을 쓰는 고전적인 방법은 더 간결 해 보인다.

Answer 1

데이터 묶음에서 하나의 값 행으로 이동하므로 요약하면됩니다. '

dat %>% select(pre, post) %>% summarize(CD = cohensD(pre, post)) 

(SELECT 문의 ISN하십시오 dplyr 파이프 라인에서 당신은 다음의 서브 세트를 할 필요가 없습니다 대한 요약 함수 내에서 대한 요약 기능을 사용할 수 있으며, 너무처럼 pre 및 post

를 호출 할 수 있습니다 이 경우 실제로 필요하다. 그러나 파이프 라인에서 이것이 어떻게 작동하는지 보여주기 위해 왼쪽으로 두었다.)

Answer 2

. 연산자를 호출 할 때 중첩 함수 (예 : $...)가 아닌 인수로 직접 사용해야하기 때문에 작동하지 않습니다. 당신이 정말로 배관을 사용하려면

, 당신은 공식 인터페이스와 함께 할,하지만 전에 약간의 재편과 (용융 reshape2 패키지입니다) 할 수 있습니다

는

dat %>% select(pre, post) %>% melt %>% cohensD(value~variable, .) 
#### [1] 0.8115027 

Answer 3

이 작동합니다 :

dat %>% select(pre, post) %>% {cohensD(.$pre, .$post)} 

마지막 호출을 중괄호로 감싸는 것은 함수 호출이 아닌 표현식처럼 취급됩니다. 뭔가를 표현식으로 파이프하면,. 예상대로 교체됩니다. 나는 종종이 트릭을 사용하여 파이핑과 잘 인터페이싱하지 않는 함수를 호출한다.

중괄호 안에있는 것은 함수 호출 일 뿐이며 실제로는 .의 표현식이 될 수 있습니다.