R：在函数中将模型名作为参数传递？

在R

i、 e模型名称可以是glm、rpart、randomForest等中的一个

假设我有一个函数

 model_name(formula, data, ..)  

我需要一个实现：

callMyModel = function(model_name, formula, data)
{
    fit = model_name(formula, data)
}

这可能吗？如果是，怎么做

---

注意：我不需要带有if条件的实现。

您是否运行了自己的代码？您当前的实现应该可以很好地工作…更好的实现可以是callMyModel=functionmodel_name，formula，data，{model_name，formula，data，}谢谢@PingJin。那很好。

fit = callMyModel(glm, Y ~ ., mydata) #It should fit glm on my data
fit = callMyModel(rpart, Y ~ ., mydata) #It should fit rpart on my data