R/pjp_not_in.R

In perezp44/pjpv.curso.2022: Paquete de apoyo a mis cursos

#' @title mi version de not_in
#' @description te dice los valores de x q no estan en y
#'
#' @param x a vector
#' @param y a vector
#' @return Un nuevo vector con los elementos de x q no estan en y
#' @export


pjp_f_not_in <- function(x,y) {
    #- otra version. '%!in%' <- function(x,y)!('%in%'(x,y))  #- esta f. es not_in
      # aa <- !('%in%'(x,y))  #- esta f. es not_in
      # xx <- x[aa]
      x[!x %in% y]
}