将参数传递给从R中的字符串调用的用户定义函数的最佳方式是什么?

将参数传递给从R中的字符串调用的用户定义函数的最佳方式是什么?,r,user-defined-functions,R,User Defined Functions,我觉得这很简单,只是缺少一个简单的函数。我的环境中有用户定义的函数打开,弱,强等 我的代码中有一个变量,它根据条件选择要运行的函数之一 Fun_Sel<-case_when(TP < 6 ~ "Pass", 6 <= TP & TP <= 11 ~ "Weak", 12 <= TP & TP <= 12 ~ "Rule22", 1

我觉得这很简单,只是缺少一个简单的函数。我的环境中有用户定义的函数<代码>打开,

我的代码中有一个变量,它根据条件选择要运行的函数之一

Fun_Sel<-case_when(TP < 6 ~ "Pass",
                   6  <= TP & TP <= 11 ~ "Weak",
                   12 <= TP & TP <= 12 ~ "Rule22",
                   13 <= TP & TP <= 21 ~ "Open",
                   TP >= 22 ~ "Strong")
使用
eval(parse(text=Fun_Sel))
给了我同样的问题


如何传递参数并运行函数,而不是在函数本身的控制台中获取打印输出?

我同意,使用get()获取乐趣只会返回函数对象本身。这就是它被打印在控制台上的原因。事实上,您将()放在激活它的函数之后,并进行函数调用。您可以在()中包含所需的参数


请尝试获取(乐趣)(非常感谢。我知道这很简单
get(Fun_Sel)
function(df){

  if( 15 <= as.numeric(df[2]) & as.numeric(df[2]) <= 17 & df[4] == "Bal"){....
get(Fun_Sel)(par1, par2, etc)