整数和字母之间的条带空间

Question

我希望转动这个字符串：
“25马力”到“25马力”

分别为 “Foo bar 25 stack 1 overflow”to“Foo bar 25stack 1overflow”

在正则表达式中有没有一种有效的方法呢？

Answer 1

使用lookarounds regex：

dat <- data.frame(var1 = c("a", "b"),
                  var2 = c("hi", "low"),
                  var3 = c(0, 0.1),
                  stringsAsFactors = FALSE
                  )

RegEx Demo

$repl = preg_replace('/(?<=\d)\h+(?=[a-zA-Z])/', '', $input);