评估以stringforms给出的expression式

我很想知道R是否可以使用它的eval()函数来执行由string提供的计算。

这是一个常见的情况:

 eval("5+5") 

但是,而不是10我得到:

 [1] "5+5" 

任何解决scheme

eval()函数计算expression式,但"5+5"是一个string,而不是一个expression式。 使用parse()text=<string>将string更改为expression式:

 > 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()函数将字符转换为expression式。 您需要指定input是文本,因为parse默认情况下需要一个文件:

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

对不起,但我不明白为什么很多人甚至认为string是可以评估的东西。 你必须改变你的想法。 忘记所有string之间的连接和expression式,调用,另一边的评估。

(可能)唯一的连接是通过parse(text = ....) ,所有优秀的R程序员应该知道这是很less有效或安全的方式来构buildexpression式(或调用)。 而是更多地了解有关substitute()quote()以及可能使用do.call(substitute, ......)

R> fortunes :: fortune(“answer is parse”)

如果答案是parse(),你通常应该重新思考这个问题。 – Thomas Lumley R-help(2005年2月)

R>

或者,您可以使用我的evals软件包中的evals来捕获输出以及所有警告,错误和其他消息以及原始结果:

 > 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"