使用stringr与正向预查提取字符串非匹配部分遇NA问题求助

错误原因分析 #

你写的正则.*(?<=_and)逻辑有误：(?<=_and)是正向后顾断言，它要求当前匹配位置的前面是_and，但.*会贪婪匹配到字符串末尾，此时末尾位置的前面是text而非_and，导致匹配失败返回NA。

几种可行解决方案 #

方案1：使用正向前瞻断言匹配前置内容

用(?=_and)正向前瞻断言（要求当前位置后面是_and），让.*匹配到_and之前的所有内容：

library(stringr)
text <- "my_text_and_unwanted_text"
output <- str_extract(text, ".*(?=_and)")
output
# 输出: "my_text"

方案2：直接移除末尾冗余内容（更直观）

用str_remove直接删除从_and开始的所有末尾文本：

output <- str_remove(text, "_and.*")
output
# 输出: "my_text"

方案3：替换固定冗余文本（如果冗余内容固定）

如果末尾冗余是固定字符串_and_unwanted_text，直接替换为空即可：

output <- str_replace(text, "_and_unwanted_text", "")
output
# 输出: "my_text"

额外处理：如果需要把下划线换成空格

若你预期结果是带空格的my text，提取后可加一步替换：

output <- str_replace(str_extract(text, ".*(?=_and)"), "_", " ")
# 输出: "my text"

内容的提问来源于stack exchange，提问作者marcel