regex - 是否有 R 函数来转义正则表达式字符的字符串

Question

我想构建一个正则表达式来替换一些要搜索的字符串，因此在将它们放入正则表达式之前需要对这些字符串进行转义，以便如果搜索的字符串包含正则表达式字符，它仍然有效。

某些语言具有可以为您执行此操作的函数(例如 python re.escape : https://stackoverflow.com/a/10013356/1900520 )。 R有这样的功能吗？

例如(组成函数):

x = "foo[bar]"
y = escape(x) # y should now be "foo\\[bar\\]"

Answer 1

我写了一个 R 版本的 Perl 的 quotemeta功能:

library(stringr)
quotemeta <- function(string) {
  str_replace_all(string, "(\\W)", "\\\\\\1")
}

我总是使用正则表达式的 perl 风格，所以这对我有用。我不知道它是否适用于 R 中的“正常”正则表达式。

编辑:我找到了解释为什么有效的来源。它在 Quoting Metacharacters section of the perlre manpage :

This was once used in a common idiom to disable or quote the special meanings of regular expression metacharacters in a string that you want to use for a pattern. Simply quote all non-"word" characters:

$pattern =~ s/(\W)/\\$1/g;

如您所见，上面的 R 代码是对相同替换的直接翻译(在经历了反斜杠 hell 之后)。联机帮助页还说(强调我的):

Unlike some other regular expression languages, there are no backslashed symbols that aren't alphanumeric.

这加强了我的观点，即该解决方案仅适用于 PCRE。