Совпадение частичных строк с grep и регулярными выражениями

Question

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

В качестве примера, скажем, у меня есть этот вектор 3-буквенных жал ...

example = c("AWA","WOO","AZW","WWP") 

я могу использовать grepl и glob2rx для поиска строк с W в качестве первого или последнего символа.

> grepl(glob2rx("W*"),example) 
[1] FALSE TRUE FALSE TRUE 

> grepl(glob2rx("*W"),example) 
[1] FALSE FALSE TRUE FALSE 

Однако, я не получаю правильный результат, когда я пытаюсь использовать его с glob2rx(*W*)

> grepl(glob2rx("*W*"),example) 
[1] TRUE TRUE TRUE TRUE 

Я уверен, что мое понимание регулярных выражений не хватает, но это кажется довольно простой проблемой и я не могу найти решение. Мне бы очень понравилась помощь!

Для дальнейшего использования, мне также очень хотелось бы знать, могу ли я распространить это на случай, когда у меня есть более длинные строки. Скажем, у меня есть строки длиной 5 символов, можно ли использовать grepl таким образом, чтобы возвращать строки, где W - третий символ?

Answer 1

я бы подумал, что это регулярное выражение так:

> grepl("^.W",example) 
[1] TRUE FALSE FALSE TRUE 

Если вы хотите конкретную позиции, которая предуказанная затем:

> grepl("^.{1}W",example) 
[1] TRUE FALSE FALSE TRUE 

Это позволит программные вычисления:

pos= 2 
n=pos-1 
grepl(paste0("^.{",n,"}W"),example) 
[1] TRUE FALSE FALSE TRUE 

Answer 2

Если у вас есть строки 3-символов и нужно проверить второй символ, вы можете просто проверить соответствующую подстроку, а не с помощью регулярных выражений:

example = c("AWA","WOO","AZW","WWP") 
substr(example, 2, 2) == "W" 
# [1] TRUE FALSE FALSE TRUE