正则表达式 – 将重复字符替换为另一个重复字符
发布时间：2020-12-14 06:02:09 所属栏目：百科 来源：网络整理
导读：我想用连续的1替换一个字符串中的3个或更多个连续的0.示例：’1001000001’变为’1002222211′. 在R中,我写了以下代码： gsub("0{3,}","1",reporting_line_string) 但显然它会将5 0替换为1 1.如何获得5 1？ 谢谢, 解决方法 您可以使用gsubfn函数,您可以提供
|
我想用连续的1替换一个字符串中的3个或更多个连续的0.示例：’1001000001’变为’1002222211′.
在R中,我写了以下代码： gsub("0{3,}","1",reporting_line_string)
但显然它会将5 0替换为1 1.如何获得5 1？ 谢谢, 解决方法
您可以使用gsubfn函数,您可以提供替换函数来替换正则表达式匹配的内容.
require(gsubfn)
gsubfn("0{3,function (x) paste(replicate(nchar(x),"1"),collapse=""),input)
如果安装了stringi包,则可以使用stri_dup(“1”,nchar(x))替换paste(replicate(nchar(x),“1”),collapse =“”). 或者更简洁的解决方案,如评论中建议的G. Grothendieck： gsubfn("0{3,~ gsub(".",1,x),input)
或者,您可以在Perl模式下使用以下正则表达式来替换： gsub("(?!A)G0|(?=0{3,})0",input,perl=TRUE)
通过改变0 {3,}部分,它可以扩展到任意数量的连续0. 不过,我个人并不赞同使用这种解决方案,因为它的可维护性较差. （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |