如果在R中满足条件，则使用正则表达式删除字符串中的逗号

问题描述

如果1）逗号跟随任意数字或2）逗号跟随单个字母的数字，我想从地址列表中删除逗号。

所以，如果我的输入看起来像这样：

library("data.table")
Input <- data.table(Var = c("43,Badger Drive","45A,"45BB,"Zebra House,200A Badger Drive","F27,20 Badger Drive","78,Badger 24 Drive"))

我的输出如下：

Output <- data.table(Var = c("43 Badger Drive","45A Badger Drive"," Zebra House,"78 Badger 24 Drive"))

这几乎达到了我的第一个条件，但是删除了F27之后第5行的逗号，我也不知道如何修改它才能达到我的第二个条件：

Input[,New_Input := gsub("([[:digit:]]),","\\1",Input$Var)]

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）