R/regexpEscape.s

In Hmisc: Harrell Miscellaneous

Defines functions escapeRegex escapeBS

Documented in escapeBS escapeRegex

escapeBS <- function(string) {
  gsub('\\\\', '\\\\\\\\\\', string)
}

escapeRegex <- function(string) {
  gsub('([.|()\\^{}+$*?]|\\[|\\])', '\\\\\\1', string)
}

Try the Hmisc package in your browser