logicals: Logical operators

In roperators: Additional Operators to Help you Write Cleaner R Code

Logical operators

Description

These are some convienience functions, such as a not-in, and xor operator.

This takes two arguments just like grepl - a string and a pattern. TRUE if grepl(pattern, x, ignore.case=TRUE) would be TRUE

This takes two arguments just like grepl - a string and a pattern. TRUE if grepl(pattern, x, ignore.case=FALSE, perl=TRUE) would be TRUE. It's like %like% from data.table (but slower, preferably use data.table).

Usage

x %ni% y

x %xor% y

x %aon% y

x %rlike% pattern

x %perl% pattern

Arguments

x	a character vector
y	a vector
pattern	a single character expression

Note

data.table has a %like% operator which you should try to use instead if working with data.table!

Author(s)

Ben Wiseman, [e-mail]

Examples

 #### Not in ####

 "z" %ni%  c("a", "b", "c")
 #  TRUE

 #### Exclusive or  ####

 TRUE %xor% TRUE
 # FALSE

 FALSE %xor% FALSE
 # FALSE

 FALSE %xor% TRUE
 # TRUE

 #### All-or-nothing ####

 TRUE %aon% TRUE
 # TRUE

 FALSE %aon% FALSE
 # TRUE

 FALSE %aon% TRUE
 # FALSE

# Apply a regular expression/substitution to x:

 x <- c("foo", "bar", "dOe", "rei", "mei", "obo")

 # where x has an O

 x[x %rlike% "O"]

 # [1] "foo" "dOe" "obo"

 # find x where middle letter is "O"

 x[x %rlike% "[a-z]O[a-z]"]

 # will print [1] "foo" "dOe"

# Apply a regular expression/substitution to x:

 x <- c("foo", "bar", "dOe", "rei", "mei", "obo")

 # find x where middle letter is upper-case "O"

 x[x %perl% "[a-z]O[a-z]"]

 # will print [1] "dOe"

roperators documentation built on July 26, 2023, 5:27 p.m.