R 如何使用dlply参数调用函数?

R 如何使用dlply参数调用函数?,r,plyr,R,Plyr,我希望使用dlply编写一个函数,以拟合按 "cat1 by arg1" 我的函数是这样的 fun1 <- function(arg1) { m1 <- data.frame(...) mod.var <- ... mod.form <- formula(paste("y ~", paste(mod.var, collapse = " + "))) list_of_models <- dlply(m1, .(cat1,ar

我希望使用
dlply
编写一个函数,以拟合按

"cat1 by arg1"
我的函数是这样的

fun1 <- function(arg1) {
     m1 <- data.frame(...) 
     mod.var <- ...
     mod.form <- formula(paste("y ~", paste(mod.var, collapse = " + ")))
     list_of_models <- dlply(m1, .(cat1,arg1), function(X) lm(mod.form, data = X, 
          na.action=na.omit), .parallel=FALSE) 
}
并调用函数
fun1(“cat3”)
,函数将执行

list_of_models <- dlply(m1,.(cat1,cat3), function(X) lm(mod.form, data = X,
    na.action=na.omit), .parallel=FALSE)
列出所有型号尝试
c(“cat1”,arg1)
而不是
(cat1,arg1)

引用
?dlply

论据
.variables
将数据帧拆分为公式或字符向量的变量(作为引用变量)

list_of_models <- dlply(m1,.(cat1,cat3), function(X) lm(mod.form, data = X,
    na.action=na.omit), .parallel=FALSE)