R语言：如何根据周围字符条件替换空格并添加连字符？

嗨，这个需求完全可以用正则表达式的断言功能配合gsub来实现，精准定位数字之间的空格，不会误改其他位置的空格。

核心思路 #

我们要匹配的是前后都紧跟数字的单个空格，然后把这个空格替换成-。这里用到正则的「正向回顾断言」和「正向展望断言」，用来限定空格的前后字符必须是数字，而不需要捕获这些数字本身。

具体代码实现 #

# 你的示例字符串
sample_text <- "...018 034>036..."

# 执行替换，开启perl模式支持断言
corrected_text <- gsub("(?<=\\d) (?=\\d)", " - ", sample_text, perl = TRUE)

# 查看结果
print(corrected_text)
# 输出："...018 - 034>036..."

正则表达式解析 #

• (?<=\\d)：正向回顾断言，确保当前位置的前面是一个数字（\\d代表0-9的数字，R里需要用双反斜杠转义）
• ：我们要定位替换的目标空格
• (?=\\d)：正向展望断言，确保当前位置的后面是一个数字
• perl = TRUE：R的基础gsub默认不支持断言语法，必须开启perl模式才能生效

扩展场景 #

如果你的字符串中存在多个连续空格在数字之间（比如018 034），可以把正则里的单个空格改成匹配任意空白字符的\\s+，替换后同样会变成018 - 034：

corrected_text_multi <- gsub("(?<=\\d)\\s+(?=\\d)", " - ", sample_text_multi, perl = TRUE)

这样就能完美实现你要的“只针对数字间缺失连字符的空格替换，不影响其他空格”的需求啦～

内容的提问来源于stack exchange，提问作者Conner M.