如何从字符串中提取第二个数字对？

【问题标题】：How do I extract the second number pairing from a character string?如何从字符串中提取第二个数字对？
【发布时间】：2019-10-15 21:33:38
【问题描述】：

如果我有一列的字符变量看起来像“1000_D_22”、“1002M_26”和“1014_17_2/3/2019”，我如何去除这些字符以便得到“22”、“26”和“17”？

【问题讨论】：

【解决方案1】：

strsplit通过正则表达式中的非数字字符\D，然后选择[第二个值：

x <-  c("1000_D_22", "1002M_26", "1014_17_2/3/2019")
sapply(strsplit(x, "\\D+"), `[`, 2)
#[1] "22" "26" "17"

【讨论】：