조건부로 data.frame에서 조건부로 데이터를 삭제합니다.

Question

변수 s의 반복 된 값에 따라 데이터 집합의 하위 집합을 만드는 방법을 알아 내려고 행에 연결된 id도 고려합니다.

내 데이터 세트는 가정 : 내가하고 싶은 무엇

dat <- read.table(text = " 
     id  s   
     1  2  
     1  2  
     1  1  
     1  3  
     1  3  
     1  3  
     2  3  
     2  3  
     3  2  
     3  2", 
header=TRUE) 

이며, 각 id를 들어, s = 3에 대한 첫 번째 행을 유지합니다. 내가 두 번째 순간에 subset()을 사용하는 duplicated() 및 which()를 모두 사용하는 것을 시도했다

 id  s   
     1  2  
     1  2  
     1  1  
     1  3   
     2  3   
     3  2  
     3  2 

,하지만 난 아무데도 안 오전 : dat와 결과는 것입니다. 가장 큰 문제는 어떤 경우에는 (id = 1과 id = 2 사이에서) 하나의 ID와 다른 ID 사이에 3이 겹치기 때문에 s = 3 "블록"의 첫 번째 행을 분리하는 것만으로는 충분하지 않다는 것입니다. 어떤 전략을 채택하겠습니까? 이처럼

Answer 1

:

subset(dat, s != 3 | s == 3 & !duplicated(dat)) 
# id s 
# 1 1 2 
# 2 1 2 
# 3 1 1 
# 4 1 3 
# 7 2 3 
# 9 3 2 
# 10 3 2 

주 subset이 (Why is `[` better than `subset`? 참조) 작업 위험 할 수 있으므로 수있는 긴하지만 안전 버전은 다음과 같습니다

dat[dat$s != 3 | dat$s == 3 & !duplicated(dat), ]