R/compmatch.R

Defines functions compmatch

compmatch <- function(x, split) {
  
  if (split %in% gs("special.characters"))
    split <- paste0("\\", split)
  
  res <- any(grepl(split, x))
  
  res
}

Try the netmeta package in your browser

Any scripts or data that you put into this service are public.

netmeta documentation built on April 3, 2025, 6:12 p.m.