删除字符串中的所有内容，但R中的空格，短划线和字母？

Question

我试图删除字符串中的所有内容，除了空格破折号（ - ）和字母。 例如

string1 <- "test-%432string *#$ one!~+"

如何返回“test-string one”

我试过了： gsub("[^a-zA-Z-\s]", "", string1) 无济于事 - 它会移除应留下的空间。

感谢您的帮助。

Answer 1

试试这个

/[^\w\-\s]|\d/

这对我有用。你可以在rubular.com上试一试。 享受。

或以R形式：

gsub("[^\\w\\-\\s]|\\d","",string1,perl = TRUE)
[1] "test-string  one"