如何从文本中读取数字

Question

input                                                output
 car number and model     400708   

                              how to read just numeric form    

输入输出      车号和型号400708

                              how to read just numeric form     from the above data                              

输入输出      车号和型号400708

                              how to read just numeric form     from the above data                                                                                                                                                                                                                                            

Answer 1

我们可以使用sub来提取

df1$output <- as.numeric(sub(".*\\s+", "", df1$input))

或者如果这是基于位置，请使用substring

substring(df1$input, nchar(df1$input)-5)

Answer 2

如果您想确保始终提取该6位数代码，则可以使用自动执行此操作的方法是使用正则表达式来执行此操作。

require(stringr)
input <- "S/O kk kumar sharma ropar rajasthan India 400708"
x<- str_extract(input, "\\d{6}$")

""告诉正则表达式您正在使用字符串 \\d说只需数字 [6}表示仅使用六位数字 $表示从字符串后面取出它们

如果您的地址始终以这种方式出现，这是最有效的操作方式。