Zeichenketten nicht% in% anderer Vektor von Zeichenketten finden

Question

Wenn Sie einen Vektor von Zeichenketten haben und Sie wissen wollen, welche Übereinstimmung. Es ist eine einfache Sache,% in% zu verwenden.

x <- c("red","blue","green") 
y <- c("yellow","blue","orange") 

which(x %in% y) # Literally, which X are in Y. 

Aber was ist mit dem Gegenteil, wo möchten Sie das X nicht in Y finden?

Answer 1

Eine nette Art und Weise, die Ich mag (die ich von @joran gelernt, iirc) ist:

`%nin%` <- Negate(`%in%`) 
which(x %nin% y) 
[1] 1 3  

Answer 2

Doing %in% gibt einen Vektor von Wahr und False zurück. Mit einem Ausrufezeichen werden diese Ts und Fs herumgedreht, und indem Sie alles in which einpacken, erhalten Sie Indizes.

> which(!x %in% y) 
[1] 1 3 
> which(x %in% y) 
[1] 2