a <- c(TRUE, FALSE, NA, T, F)

is.logical(a)

x <- c(2, 4, 6, 7, 11, 3, 15)

y <- c(2, 2, 6, 7, 10, 3, 15)

x == y

x != y

x > y

x >= y

x < y

x <= y

##############

# AND
"ampersand sign"
x & y

(x > 4) & (x < 12)
d <- (x > 4) & (x < 12)

# OR
"Vetical bar"

(x < 4) | (x > 12)
e <- (x > 4) & (x < 12)

!x

x != 6

x && y

x || y

g <- TRUE
h <- FALSE

j <- 2
k <- 4

# indicates elementwise exclusive OR

xor(x, y)

x <- c(FALSE, FALSE, TRUE, TRUE)
y <- c(FALSE, TRUE, FALSE, TRUE)

x | y
x & y