r - 从R中的字符串中提取唯一数字

Question

我有一个包含随机字符的字符串列表，例如:

list=list()
list[1] = "djud7+dg[a]hs667"
list[2] = "7fd*hac11(5)"
list[3] = "2tu,g7gka5"

我想知道该列表中至少存在一次数字( unique())。我的示例的解决方案是:

解决方案: c(7,667,11,5,2)
如果某人的方法不将11视为“十一”，而是“一个和一个”，那么它也将很有用。在这种情况下的解决方案是:

解决方案: c(7,6,1,5,2)
(我在一个相关主题上找到了这篇文章: Extracting numbers from vectors of strings)

Answer 1

对于第二个答案，可以使用gsub从字符串中删除不是数字的所有内容，然后按如下所示拆分字符串:

unique(as.numeric(unlist(strsplit(gsub("[^0-9]", "", unlist(ll)), ""))))
# [1] 7 6 1 5 2

对于第一个答案，类似地使用 strsplit，

unique(na.omit(as.numeric(unlist(strsplit(unlist(ll), "[^0-9]+")))))
# [1]   7 667  11   5   2

PS:不要命名您的变量 list(因为有内置函数 list)。我已将您的数据命名为 ll。