4

我想清理这个向量，只保留数字

vec = c(" 4010  \"Filling in time budget diary\"", " 8888  \"Prob cont. preceding activity\"", " 9999   \"Missing, undecipherable\";")

我想要的只是：4010, 8888, 9999

我想到了类似的东西，完全匹配数字，但它不起作用。

gsub("^[[:digit:]]$", replacement = '', vec)

谢谢

4

1 回答 1

13

我们可以使用\\D+匹配所有非数字元素并替换为''

 gsub('\\D+','', vec)
于 2015-10-18T13:59:09.563 回答