使用 gsub 删除特殊单词

Question

我尝试清理一些文本，我想从字符串中删除以下文本

googletag.cmd.push(function() { googletag.display('div-gpt-ad-1513202928332-3'); });

例如，如果

x="123 googletag.cmd.push(function() { googletag.display('div-gpt-ad-1513202928332-3'); }); 456"

然后

gsub("googletag.cmd.push(function() { googletag.display('div-gpt-ad-1513202928332-3'); });, ", x)

所需的输出是[1] 123456

谢谢你

Answer 1

您可以使用以下模式。这会查找开头的任何数字和结尾的任何数字，删除中间出现的任何数字。

x <- "123 googletag.cmd.push(function() { googletag.display('div-gpt-ad-1513202928332-3'); }); 456"

gsub("^(\\d+).*?(\\d+)$", "\\1\\2", x)
# [1] "123456"