R中的str_extract从字符串

Question

我有一张如下表格，我想提取下划线后面的数字

 description      desired_output
 desc_lvl1_id_1   1
 desc_lvl1_id_2   2

我提出的解决方案分为两部分，首先得到下划线和我想要的数字，然后取出下划线gsub（＆＃34; _＆＃34;，＆＃34; ＆＃34;，str_extract（description，＆＃34; _ [0-9]＆＃34;））。我希望这可以一步完成

Answer 1

我们可以使用正向值守（(?<=_)）并将_后面的数字与pattern中的str_extract相匹配。

library(stringr)
df1$desired_output <- as.numeric(str_extract(df1$description, '(?<=_)\\d+'))