将不带引号的字符串评估为表达式

Question

我想在一个函数中使用 R 的 D() 函数，但我很难对它们进行评估，因为 D() 只接受第一个参数作为不带引号的表达式。示例：

> D(expression(x^2), "x")
2 * x

这按预期工作。但是，当我想评估存储在字符向量中的函数时，我的目的就是这样：

> Function<-"x^2"
> D(as.expression(Function), "x")
NA

因为 as.expression(Function) 返回的是 expression("x^2") 而不是 expression(x^2)

所以问题是：当使用字符向量变量的内容作为 as.expression() 参数时，如何去掉引号，或者如何将变量的内容转换为表达式的参数（ ) 不带引号。

注意：虽然 print(Function, quote=FALSE) 会产生 x^2（即不带引号），但 D(as.expression(print(Function, quote=FALSE)), "x") 也不起作用.

Answer 1

您可以使用parse 创建表达式：

D(parse(text=Function), "x")
2 * x