让我们以以下示例为例:
x<-'RMSE_coef= -0.6 MAE_coef=-0.4'
我要做的是创建从x提取这些值-0.6和-0.4并将其更改为数值的方法。
从x提取这些数字后,这将非常容易(我们只能使用function as.numeric()
),问题就解决了。问题是-如何获得这些价值?
编辑
是否有一种代码可以在一般情况下做到这一点?我的意思是:
x<-'RMSE_coef= -0.6 MAE_coef=-0.4'
x<-'RMSE_coef= 0.6 MAE_coef=0.4'
x<-'RMSE_coef= 0.6 MAE_coef=-0.4'
x<-'RMSE_coef= -0.6 MAE_coef=0.4'
带有rebus软件包的替代解决方案:
library(dplyr)
library(rebus)
library(stringi)
library(purrr)
pattern <- optional("-") %R% one_or_more(DGT) %R% DOT %R% one_or_more(DGT)
x <-'RMSE_coef= -0.6 MAE_coef=-0.4'
stringi::stri_extract_all_regex(x, pattern) %>%
purrr::map(as.numeric)
[[1]]
[1] -0.6 -0.4
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句