Löschen Sie alle Werte wiederholt

Question

Wenn ich einen Vektor haben:

x <- c(5, 6, 2, 9, 5, 2, 1, 9, 9) 

Wie kann ich einen anderen Vektor zu machen, die Elemente enthält, die nie wiederholt? In diesem Fall wäre es: c(6, 1) (da 5, 2 und 9 wiederholt werden)

Answer 1

test <- c(5, 6, 2, 9, 5, 2, 1, 9, 9) 
setdiff(test, test[duplicated(test)]) 

Answer 2

vector.a <- c(5, 6, 2, 9, 5, 2, 1, 9, 9) 

not.reap <- NULL 
for (i in 1:length(vector.a)){ 
    not.reap[i] <- !(vector.a[i] %in% vector.a[-i]) 
} 
vector.a[not.reap]