From 6080820d483550b7050d223fe79f6a707503341b Mon Sep 17 00:00:00 2001 From: Puzzled-Face Date: Mon, 9 Oct 2023 13:21:19 +0000 Subject: [PATCH] Remove noOverlap --- R/helpers.R | 15 --------------- man/noOverlap.Rd | 21 --------------------- 2 files changed, 36 deletions(-) delete mode 100644 man/noOverlap.Rd diff --git a/R/helpers.R b/R/helpers.R index 3a9f7dafc..815c509c5 100644 --- a/R/helpers.R +++ b/R/helpers.R @@ -103,21 +103,6 @@ matchTolerance <- function(x, table) { !is.na(matchTolerance(x = x, table = table)) } -##' Check overlap of two character vectors -##' -##' @param a first character vector -##' @param b second character vector -##' @return returns TRUE if there is no overlap between the two character -##' vectors, otherwise FALSE -##' -##' @keywords internal -noOverlap <- function(a, b) { - identical( - intersect(a, b), - character(0) - ) -} - ##' checks for whole numbers (integers) ##' ##' @param x the numeric vector diff --git a/man/noOverlap.Rd b/man/noOverlap.Rd deleted file mode 100644 index 20526f8f3..000000000 --- a/man/noOverlap.Rd +++ /dev/null @@ -1,21 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/helpers.R -\name{noOverlap} -\alias{noOverlap} -\title{Check overlap of two character vectors} -\usage{ -noOverlap(a, b) -} -\arguments{ -\item{a}{first character vector} - -\item{b}{second character vector} -} -\value{ -returns TRUE if there is no overlap between the two character -vectors, otherwise FALSE -} -\description{ -Check overlap of two character vectors -} -\keyword{internal}