努力争取这场比赛并在R gsub取代工作仍然没有成功.
我试图在一个字符串中匹配模式“Reason：”,并在此模式之后接触所有内容,直到第一次出现一个点(.)
例如：
我试图在一个字符串中匹配模式“Reason：”,并在此模式之后接触所有内容,直到第一次出现一个点(.)
例如：
Offer Disposition. MSISDN: 7183067962. Offer: . Disposition: DECLINED. Reason: Not interested. ChannelID: CARE.
会回来“不感兴趣”
解决方法
这是一个解决方案：
s <- "Offer Disposition. MSISDN: 7183067962. Offer: . Disposition: DECLINED. Reason: Not interested. ChannelID: CARE."
sub(".*Reason: (.*?)\\..*","\\1",s)
# [1] "Not interested"
更新(发表评论)：
如果你还有与模式不匹配的字符串,我建议使用regexpr而不是sub：
s2 <- c("no match example","Offer Disposition. MSISDN: 7183067962. Offer: . Disposition: DECLINED. Reason: Not interested. ChannelID: CARE.")
match <- regexpr("(?<=Reason: ).*?(?=\\.)",s2,perl = TRUE)
ifelse(match == -1,NA,regmatches(s2,match))
# [1] NA "Not interested. ChannelID: CARE"
对于第二个示例,您可以使用以下正则表达式：
s3 <- "Delete Payment Arrangement of type Proof of Payment for BAN : 907295267 on date 02/01/2014,from reason PAERR."
# a)
sub(".*type (.*?) for.*",s3)
# [1] "Proof of Payment"
# b)
match <- regexpr("(?<=type ).*?(?= for)",s3,regmatches(s3,match))
# [1] "Proof of Payment"
