[如果我有一列字符变量看起来像“ 1000_D_22”,“ 1002M_26”和“ 1014_17_2 / 3/2019”,那么如何去除字符,使我得到“ 22”,“ 26”和“ 17“?
[strsplit用正则表达式中的非数字字符\D,然后选择[第二个值:
strsplit
\D
[
x <- c("1000_D_22", "1002M_26", "1014_17_2/3/2019") sapply(strsplit(x, "\\D+"), `[`, 2) #[1] "22" "26" "17"