R/utils-infix-helpers.R

Defines functions `%nin%` `%@%` `%||%` `%l0%`

`%l0%` <- function(x, y) if (length(x) == 0) y else x
`%||%` <- function(x, y) if (is.null(x)) y else x
`%@%` <- function(x, name) attr(x, name, exact = TRUE)
`%nin%` <- function(x, table)  match(x, table, nomatch = 0) == 0
hrbrmstr/attackerkb documentation built on Oct. 30, 2020, 10:20 a.m.