R语言中如何将字符字符串转换为对应数值并计算总和？

方法一：通过表达式求值计算结果 #

你当前生成的"a+b+b+a"是包含变量的表达式字符串，as.numeric()无法直接解析这类内容，需要用eval()搭配parse()来执行该表达式：

a=1; b=2
str= "abba"
# 生成表达式字符串（原有代码可简化，因输入为纯字母字符串）
expr_str <- paste(unlist(strsplit(str, split = "")), collapse="+")
# 解析并执行表达式
result <- eval(parse(text = expr_str))
print(result)
# 输出：[1] 6

方法二：直接映射变量值求和（更安全） #

如果无需生成表达式字符串，可直接拆分字符后获取对应变量的值再求和，这种方式避免了eval(parse())的潜在安全风险（比如处理不可信输入时）：

a=1; b=2
str= "abba"
# 拆分字符串为单个字符的向量
char_vec <- strsplit(str, "")[[1]]
# 逐个获取字符对应的变量值
num_values <- sapply(char_vec, get)
# 求和得到最终结果
result <- sum(num_values)
print(result)
# 输出：[1] 6

补充说明 #

• 方法一适合处理复杂表达式场景，但需注意输入字符串的安全性，避免执行恶意代码。
• 方法二更直接高效，适合这类简单的变量映射求和需求。

内容的提问来源于stack exchange，提问作者Soutrik Mandal