단일 목록에있는 여러 데이터 프레임에서 두 개의 열로 정의 된 중복 항목이있는 행을 제거하려고합니다.
간단한 데이터 :
aa <- data.frame(a=rnorm(100),b=rnorm(100),x=rnorm(100),y=rnorm(100),Z=rep(1:4, each=25))
split.aa<-split(aa, aa$Z)
목록 'split.aa'의 각 df에 대해 중복 된 x, y 쌍이있는 행을 제거하려고합니다.
나는 이것을 한 번에 한 df 할 수 있습니다.
split[[z]][!duplicated(split[[z]][,c('x','y')]),]
여기서 z는 'split.aa'내의 각 df 이름입니다.
작업이 각 요소에서 수행되도록 lapply에 어떻게 작성합니까?
lapply 함수 내에서 특정 목록 요소를 참조하는 방법에 대해 머리를 감싸는 데 어려움을 겪고 있습니다.
lapply(split.aa, function(x) x[!duplicated(x[c("x", "y")]), ])
트릭을 할 것입니다.
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다