R/compmatch.R

Defines functions compmatch

compmatch <- function(x, split) {
  
  if (split %in% .special.characters)
    split <- paste("\\", split, sep = "")
  
  res <- any(grepl(split, x))
  
  res
}
guido-s/netmeta documentation built on Feb. 3, 2024, 8:34 a.m.