评估以字符串形式给出的表达式

我很好奇R是否可以使用其eval()功能来执行例如字符串提供的计算。

这是一个常见的情况：

eval("5+5")

但是，我得到的不是10个：

[1] "5+5"

有什么办法吗？

该eval()函数计算一个表达式，但它"5+5"是一个字符串，而不是表达式。使用parse()with text=<string>将字符串更改为表达式：

> eval(parse(text="5+5"))
[1] 10
> class("5+5")
[1] "character"
> class(parse(text="5+5"))
[1] "expression"

调用会eval()调用许多行为，但某些行为并非立即显而易见：

> class(eval(parse(text="5+5")))
[1] "numeric"
> class(eval(parse(text="gray")))
[1] "function"
> class(eval(parse(text="blue")))
Error in eval(expr, envir, enclos) : object 'blue' not found

另请参见tryCatch。

您可以使用该parse()函数将字符转换为表达式。您需要指定输入为文本，因为默认情况下parse需要一个文件：

eval(parse(text="5+5"))

抱歉，但我不明白为什么太多人甚至认为字符串是可以评估的东西。确实，您必须改变观念。忘记一侧的字符串与另一侧的表达式，调用，求值之间的所有连接。

（可能是）唯一的连接是通过parse(text = ....)，所有好的R程序员都应该知道，这很少是构造表达式（或调用）的有效或安全的方法。而是了解更多有关的信息substitute()，quote()以及可能的使用能力do.call(substitute, ......)。

fortunes::fortune("answer is parse")
# If the answer is parse() you should usually rethink the question.
#    -- Thomas Lumley
#       R-help (February 2005)

2017年12月：好的，这是一个示例（注释中没有很好的格式）：

q5 <- quote(5+5)
str(q5)
# language 5 + 5

e5 <- expression(5+5)
str(e5)
# expression(5 + 5)

而且，如果您有更多的经验，您将学到q5a 是，"call"而a e5是"expression"，甚至e5[[1]]等同于q5：

identical(q5, e5[[1]])
# [1] TRUE

另外，您也可以evals从我的pander程序包中捕获输出以及所有警告，错误和其他消息以及原始结果：

> pander::evals("5+5")
[[1]]
$src
[1] "5 + 5"

$result
[1] 10

$output
[1] "[1] 10"

$type
[1] "numeric"

$msg
$msg$messages
NULL

$msg$warnings
NULL

$msg$errors
NULL


$stdout
NULL

attr(,"class")
[1] "evals"

现在，您还可以使用包中的lazy_eval函数lazyeval。

> lazyeval::lazy_eval("5+5")
[1] 10

同样使用rlang：

eval(parse_expr("5+5"))