Mecz z negacją

To jest naprawdę proste, ale nie mogę go zlokalizować. Wiem, że R ma zanegowaną wersję %in%, która zwraca "nie w". Oczywiście mogłem po prostu użyć !(x %in% y), ale język zawiera już zanegowaną konstrukcję i chcę jej użyć, goshdarnit.Mecz z negacją

Więc jaka jest funkcja? Wyszukiwania, a także %nin% i %notin% wszystko zawiedzie.

Bonus internets do ciebie, jeśli wzorzec odpowiedź kontra !(x %in% y) stosując następujące dane przykładowe:

x <- sample(sample(letters,5), 10^3, replace=TRUE) 
y <- sample(letters, 10^5, replace=TRUE)

Źródło

2012-07-03 Ari B. Friedman

Nie sądzę, że tak. Po prostu robię własne używając 'Negate'. – joran

Co nasuwa pytanie: czy 'Negacja' jest szybsza/wolniejsza niż'! '? Ale poważnie, mógłbym przysiąc, że widziałem to już wcześniej. –

Myślę, że pakiet dodatek ma to, co masz po, ale nie jest zbyt szorstki na palec wskazujący, aby wpisać '!'. Zwłaszcza, że twoje nawiasy są niepotrzebne. '! x% w% y' działa dobrze. Zgaduję, że Negate będzie wolniejszy, ponieważ często są to funkcje o wyższym poziomie. –

prostu z odsetek. Definiowanie:

"%w/o%" <- function(x, y) x[!x %in% y] 
'%ni%' <- Negate('%in%') 

> benchmark(y[y%ni%x], y%w/o%x,replications=1000) 
     test replications elapsed relative user.self sys.self user.child 
2 y %w/o% x   1000 5.32 1.000000  4.60  0.70   NA 
1 y[y %ni% x]   1000 5.34 1.003759  4.68  0.65   NA 
    sys.child 
2  NA 
1  NA

Czy otrzymuję plik cookie?

Źródło

2012-07-03 01:15:47 shhhhimhuntingrabbits

Otrzymujesz plik cookie dla "testu porównawczego (y [y% ni% x], y% w/o% x)". Czy możesz edytować? –

Więc to jest w zasadzie pranie - 0.3% różnicy to błąd pomiaru. Ale miła praca. –

Ale może zgubić plik cookie z powodu '/' w nazwie funkcji? :-) –

Mecz z negacją

Odpowiedz

Powiązane problemy