如何评估一个字符串作为一个函数与函数，并将其分配给一个变量?

Question

我有一个对象function1，它接收另一个function0，并将其分配给一个变量:

val <- function1(function0)

我想把它包装成一个字符串，然后计算赋值:

get(eval(paste0("val <- function1(function0)"))

但它说它是cannot find the object。有没有办法在R中做到这一点?

Answer 1

eval(parse(text = "val <- function1(function0)"))
get("val")

一个例子:

function0 <- function () "WhatIf"
function1 <- function (f) f()
eval(parse(text = "val <- function1(function0)"))
get("val")