目录
一、实现代码:
R
install.packages("stringr")
library(stringr)
# 创建一个包含正负小数的向量
vec <- c("1.5", "-2.7", "3.8", "-4.2", "5.0", "missing value")
# 使用正则表达式提取正负小数
Result <- str_extract(vec, "-?\\d.*\\d")
print(str_extract(vec, "-?\\d.*\\d"))
print(na.omit(Result))
Res <- na.omit(Result)
sum(as.numeric(Res))
#or
Result_1 <- as.numeric(Result)
Result_2 <- Result_1[!is.na(Result_1)]
Result_2
sum(Result_2)
二、运行结果:
三、str_extract()函数介绍材料
关于str_extract()函数的介绍可以参考下面的书籍: