Почему это исключение grep не работает в R?

Question

Я пытаюсь исключить определенные символы при использовании grep в R. Но я не могу получить результат, который я ожидаю.

Вот код:

x <- c("a", "ab", "b", "abc") 
grep("[^b]", x, value=T) 
> [1] "a" "ab" "abc" 

Я хочу, чтобы захватить что-нибудь в векторе x, который не содержит b. Он не должен возвращать "ab" или "abc".

В конечном счете, я хочу выбрать любой элемент, содержащий "a", но не "b". Это результат, который я хотел бы ожидать:

grep("a[^b]", x, value=T) 
> [1] "a" 

Как я могу это сделать?

Answer 1

Попробуйте это:

grep("^[^b]*a[^b]*$", x, value=TRUE) 
# [1] "a" 

Он ищет начало строки, а затем позволяет любое количество символов, которые не являются «б», то «а», то любое число символов, которые не являются «b», а затем конец строки.

Answer 2

Мы можем использовать invert property of grep, который возвращает values, которые не совпадают. Таким образом, здесь он возвращает те значения, которые не имеют в них «b».

grep("b", x, value = TRUE, invert = TRUE) 
#[1] "a" 

Answer 3

Я получил результат, что вы ищете, используя это регулярное выражение в Grep:

grep("^[^b]*$", x, value=TRUE) 
[1] "a"