Проверьте, содержит ли вектор заданный элемент
Вопрос
Как проверить, содержит ли вектор заданное значение?
Решение
Оба match()
(возвращает первое появление) и %in%
(возвращает логическое значение) функции предназначены для этого.
v <- c('a','b','c','e')
'b' %in% v
## returns TRUE
match('b',v)
## returns the first location of 'b', in this case: 2
Другие советы
is.element()
делает код более читаемым и идентичен %in%
v <- c('a','b','c','e')
is.element('b', v)
'b' %in% v
## both return TRUE
is.element('f', v)
'f' %in% v
## both return FALSE
subv <- c('a', 'f')
subv %in% v
## returns a vector TRUE FALSE
is.element(subv, v)
## returns a vector TRUE FALSE
В любой() функция обеспечивает читаемость кода
> w <- c(1,2,3)
> any(w==1)
[1] TRUE
> v <- c('a','b','c')
> any(v=='b')
[1] TRUE
> any(v=='f')
[1] FALSE
Я сгруппирую параметры на основе выходных данных.Предположим, что для всех примеров используется следующий вектор.
v <- c('z', 'a','b','a','e')
Для проверки наличия:
%в%
> 'a' %in% v
[1] TRUE
любой()
> any('a'==v)
[1] TRUE
is.элемент()
> is.element('a', v)
[1] TRUE
Для поиска первого случая:
совпадение()
> match('a', v)
[1] 2
Для нахождения всех вхождений в виде вектора индексов:
который()
> which('a' == v)
[1] 2 4
Для нахождения всех вхождений в виде логического вектора:
==
> 'a' == v
[1] FALSE TRUE FALSE TRUE FALSE
Редактировать:Удаление grep() и grepl() из списка по причине, указанной в комментариях
Вы можете использовать %in%
оператор:
vec <- c(1, 2, 3, 4, 5)
1 %in% vec # true
10 %in% vec # false
Также, чтобы найти положение элемента, "который" может быть использован как
pop <- c(3,4,5,7,13)
which(pop==13)
и чтобы найти элементы, которые не содержатся в целевом векторе, можно сделать это:
pop <- c(1,2,4,6,10)
Tset <- c(2,10,7) # Target set
pop[which(!(pop%in%Tset))]
Мне действительно нравятся grep() и grepl() для этой цели.
grep() возвращает вектор целых чисел, которые указывают, где находятся совпадения.
yo <- c("a", "a", "b", "b", "c", "c")
grep("b", yo)
[1] 3 4
grepl() возвращает логический вектор с "TRUE" в месте совпадений.
yo <- c("a", "a", "b", "b", "c", "c")
grepl("b", yo)
[1] FALSE FALSE TRUE TRUE FALSE FALSE
Эти функции чувствительны к регистру.