我该如何通过gsub来选择字符串？

Question

我有这样的字符串：

df
[1] "XID\t5647: asasaasa" "XID\t1540"  

如何使用gsub仅选择“ XID \\ t”之后的数字？ 我使用gsub如下：

gsub(".*XID\t(.*)\\:.*", "\\1", df)
>[1] "5647"     "XID\t1540"

要么

gsub(".*XID\t(.*)", "\\1", df)
>[1] "5647: asasaasa" "1540" 

但我希望这样：

[1] "5647" "1540" 

我认为案例是重叠的，因此我必须使用gsub两次，这样我才能根据需要选择它们。 请给我您的想法，谢谢。

Answer 1

我们可以使用str_extract匹配数字部分（ \\\\d+ ）

library(stringr)
str_extract(df, "\\d+")
#[1] "5647" "1540"

或者使用gsub匹配所有非数字（ \\\\D+ ）并将其替换为"" 。

gsub("\\D+", "", df)
#[1] "5647" "1540"

或者使用OP的语法来匹配“ XID \\ t”之后的一个或多个数字（ \\\\d+ ），将其捕获为一个组（ (...) ），然后将其替换为后向引用（ \\\\1 ）。

sub(".*XID\t(\\d+).*", "\\1", df)
#[1] "5647" "1540"

数据

df <- c("XID\t5647: asasaasa", "XID\t1540" )

Answer 2

只需将非数字的任何内容替换为“”

x=c("XID\t5647: asasaasa", "XID\t1540" )
gsub("[^0-9]","",x)
#[1] "5647" "1540"