从字符串中提取十进制数

时间:2013-10-08 15:59:12

标签: r regex string

我有一个字符串,例如"3.1 ml""abc 3.1 xywazw"

我想从此字符串中提取"3.1"。我在stackoverflow上发现了许多关于从字符串中提取数字的问题,但没有解决方案适用于十进制数字的情况。

4 个答案:

答案 0 :(得分:13)

使用stringr库:

x<-"abc 3.1 xywazw"
str_extract(x, "\\d+\\.*\\d*")
[1] "3.1"

答案 1 :(得分:13)

此方法使小数点和小数部分可选,并允许提取多个数字:

str <- " test 3.1 test 5"
as.numeric(unlist(regmatches(str,
                             gregexpr("[[:digit:]]+\\.*[[:digit:]]*",str))
          )      )
#[1] 3.1 5.0

关于负数的问题可以通过可选的perl样式预测来解决:

 str <- " test -4.5 3.1 test 5"
    as.numeric(unlist(regmatches(str,gregexpr("(?>-)*[[:digit:]]+\\.*[[:digit:]]*",str, perl=TRUE))))

#[1] -4.5  3.1  5.0

答案 2 :(得分:5)

来自http://www.regular-expressions.info/floatingpoint.html的浮点数的正则表达式,稍微调整为在R中工作。

s <- "1e-6 dkel"
regmatches(s,gregexpr("[-+]?[0-9]*\\.?[0-9]+([eE][-+]?[0-9]+)?",s)) 
> [[1]]
> [1] "1e-6"

答案 3 :(得分:1)

您可以使用正则表达式:

> str <- " test 3.1 test"
> as.numeric(regmatches(str,regexpr("[[:digit:]]+\\.[[:digit:]]+",str)))
[1] 3.1

regexpr返回匹配字符串的起始位置和长度。 regmatches返回匹配项。然后,您可以将其转换为数字。