定位字符串 [R] 中第一个数字的位置

Question

如何在 R 中创建一个函数来定位字符串中第一个数字的单词位置？

例如：

string1 <- "Hello I'd like to extract where the first 1010 is in this string"
#desired_output for string1
9

string2 <- "80111 is in this string"
#desired_output for string2
1

string3 <- "extract where the first 97865 is in this string"
#desired_output for string3
5

Answer 1

我只是在这里使用grep和strsplit这里作为一个基本的 R 选项：

sapply(input, function(x) grep("\\d+", strsplit(x, " ")[[1]]))

Hello I'd like to extract where the first 1010 is in this string
                                                               9
                                         80111 is in this string
                                                               1
                 extract where the first 97865 is in this string
                                                               5

数据：

input <- c("Hello I'd like to extract where the first 1010 is in this string",
           "80111 is in this string",
           "extract where the first 97865 is in this string")