如何删除 R 中有异常的字符串？

Question

我有一个字符串。我想 (a) 将“/”保留为分数，(b) 在单词之间的“/”周围插入空格，以及 (c) 删除所有其他“/”。

s = "/// // / 1/2 111/222 a/b  abc/abc a / b /  // ///"

结果应该如下。

s = "1/2 111/222 a b abc abc a b"

我已经尝试了一些东西。我不能把一切都做好。

Answer 1

我不是正则表达式专家，但这似乎适用于您的示例。

s = "/// // / 1/2 111/222 a/b  abc/abc a / b /  // ///"

i <- gsub("/{2,}|/\s", "", s)
i <- trimws(gsub("([[:alpha:]]{1,})(/)([[:alpha:]]{1,})", "\1 \3", i))
i <- gsub("\s{2,}", " ", i)

identical(i, "1/2 111/222 a b abc abc a b")

[1] TRUE

如何删除 R 中有异常的字符串？

How to remove strings with exceptions in R?

regex

r

gsub