Проверьте уникальные элементы

Question

просто вопрос. У меня есть кадр данных (только один вектор показан), который выглядит следующим образом:

CLN1

б


с
д

... .

Я хотел бы следить г Выход:

CLN1
б
с
д

Другими словами, я хотел бы удалить все элементы, которые реплицируются. Функции «уникальный», а также «дублированный» возвращают выход, включая реплицированный элемент, представленный один раз. Я хотел бы удалить его окончательно.

Answer 1

Вы можете использовать setdiff для этого:

R> v <- c(1,1,2,2,3,4,5) 
R> setdiff(v, v[duplicated(v)]) 
[1] 3 4 5 

Answer 2

Вы можете использовать count из plyr пакета для подсчета вхождений элемента, и удалить все, кто встречается более чем один раз.

library(plyr) 
l = c(1,2,3,3,4,5,6,6,7) 
count_l = count(l) 
    x freq 
1 1 1 
2 2 1 
3 3 2 
4 4 1                   
5 5 1                   
6 6 2                   
7 7 1 
l[!l %in% with(count_l, x[freq > 1])] 
[1] 1 2 4 5 7 

Обратите внимание на !, что означает NOT. Вы, конечно, поставить это в Oneliner:

l[!l %in% with(count(l), x[freq > 1])] 

Answer 3

Другой способ использования table:

С данными @ Джубы:

as.numeric(names(which(table(v) == 1))) 
# [1] 3 4 5 

По данным О. П., так как его выход персонажа, as.numeric не обязательный.

names(which(table(v) == 1)) 
# [1] "b" "c" "d"