R语言字符中的连续数字挑出,并作为多位数,并将所有数字求和

Question

用基础的R语言，做到将一段字符中的连续数字挑出，并作为多位数，并将所有数字求和

Answer 1

以下回复参考：皆我百晓生、券券喵儿等免费微信小程序作答:

你可以使用正则表达式和字符串处理函数来实现这个任务。下面是一个简单的例子，演示了如何在一个字符串中找到连续的数字，并将这些数字求和：

# 定义包含数字的字符串
str <- "abc123def456ghi789jkl"

# 使用正则表达式匹配连续的数字
numbers <- regexpr("\\d+", str, perl = TRUE)  # \d+匹配连续的一个或多个数字
digits_vector <- substr(str, numbers, numbers + nchar(numbers))  # 提取匹配到的数字片段

# 将提取的数字片段转换为数字并求和
sum_of_digits <- sum(as.numeric(digits_vector))

# 输出结果
print(sum_of_digits)  # 输出连续数字的总和

这段代码会找到字符串 str 中的所有连续数字，将它们作为多位数并求和。例如，在字符串 "abc123def456ghi789jkl" 中，它会找到 123、456 和 789 并求和得到 1368。注意这个例子假设字符串中的数字是连续的并且没有分隔符（如逗号或空格）。如果有分隔符，你可能需要额外的处理来确保正确提取数字。