R/operators.R

In verasls/lvmisc: Veras Miscellaneous

#' Value matching
#'
#' @name notin
#' @rdname notin
#'
#' @param x Vector with the values to be matched.
#' @param table Vector with the values to be matched against.
#'
#' @return A logical vector indicating which values are not in \code{table}.
#'
#' @export
#'
#' @seealso \code{\link[base:match]{match()}}.
#'
#' @examples
#' x <- 8:12
#' x %!in% 1:10
'%!in%' <- function(x, table) !(x %in% table)