% in %의 반대

데이터 프레임 D1의 categorical 형 변수 V1은 A에서 Z까지의 문자로 표시되는 값을 가질 수 있습니다. B, N 및 T와 같은 일부 값을 제외한 하위 집합 D2를 만들고 싶습니다. 기본적으로 다음과 같은 명령을 원합니다. ~와 반대 인 %in%

D2 = subset(D1, V1 %in% c('B','N',T'))

!연산자를 사용하여 기본적으로 TRUE FALSE 및 모든 FALSE TRUE를 만들 수 있습니다 . 그래서:

D2 = subset(D1, !(V1 %in% c('B','N','T')))

편집 : 연산자를 직접 만들 수도 있습니다.

'%!in%' <- function(x,y)!('%in%'(x,y))

c(1,3,11)%!in%1:10
[1] FALSE FALSE  TRUE

어때요?

'%ni%' <- Negate('%in%')
c(1,3,11) %ni% 1:10
# [1] FALSE FALSE  TRUE

당신이 코드를 보면 %in%

 function (x, table) match(x, table, nomatch = 0L) > 0L

그런 다음 반대 버전을 쓸 수 있어야합니다. 나는 사용한다

`%not in%` <- function (x, table) is.na(match(x, table, nomatch=NA_integer_))

다른 방법은 다음과 같습니다.

function (x, table) match(x, table, nomatch = 0L) == 0L

여기에 사용 버전 filter에서 dplyr그와 논리를 부정하여 허용 대답과 같은 기술을 적용! :

D2 <- D1 %>% dplyr::filter(!V1 %in% c('B','N','T'))

negatefrom purrr을 사용 하면 트릭을 빠르고 깔끔하게 수행합니다.

`%not_in%` <- purrr::negate(`%in%`)

예를 들어 사용법은

c("cat", "dog") %not_in% c("dog", "mouse")

purrr::compose() 다음과 같이 나중에 사용하기 위해 이것을 정의하는 또 다른 빠른 방법입니다.

`%!in%` <- compose(`!`, `%in%`)

다른 해결책은 setdiff

D1 = c("A",..., "Z") ; D0 = c("B","N","T")

D2 = setdiff(D1, D0)

D2 원하는 하위 집합입니다.

Hmisc은 %nin% 기능이 있습니다.

https://www.rdocumentation.org/packages/Hmisc/versions/4.4-0/topics/%25nin%25

가장 명확한 사용법은

!('Spain' %in% c('Germany', 'France', 'Italy'))

library(roperators)

1 %ni% 2:10

require(TSDT)

c(1,3,11) %nin% 1:10
# [1] FALSE FALSE  TRUE

자세한 내용은 https://cran.r-project.org/web/packages/TSDT/TSDT.pdf를 참조하십시오.

% in %에 대한 도움말 help("%in%")에는 예제 섹션에 포함되지 않은

"%w/o%" <- function(x, y) x[!x %in% y] #-- x without y

해 봅시다:

c(2,3,4) %w/o% c(2,8,9)
[1] 3 4

대안 적으로

"%w/o%" <- function(x, y) !x %in% y #--  x without y
c(2,3,4) %w/o% c(2,8,9)
# [1] FALSE  TRUE  TRUE