删除所有重复的值

Question

如果我有一个矢量：

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

如何创建包含从未重复过的元素的另一个向量？在这种情况下，它将是：c(6, 1)（因为重复了5,2和9）

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]