%IN%.R

# String in text (vectorised)

# A Python-style String in Text operator that ignores case. Either x or pattern must be a single value. Returns a logical value or vector.

{\(pattern, x) stringi::stri_detect_regex(x, pattern, case_insensitive = TRUE)} -> `%IN%`

# usage

'dog' %IN% 'the nice dog said hello'
#> [1] TRUE
'dog.*said' %IN% 'the nice dog said hello'
#> [1] TRUE

q = 'dog'
vec = c('nice dog', 'nice cat', 'NICE DOG', 'hey duggee')
q %IN% vec
#> [1]  TRUE FALSE  TRUE FALSE

q = c('dog', 'cat', 'bird', 'mouse')
str = 'the cat sat on the mat'
q %IN% str
#> [1] FALSE  TRUE FALSE FALSE