0

我正在尝试使用“foreach”和“dopar”运行混合模型,但我不断收到一条错误消息,提示“任务 1 失败 - ”找不到函数“lmer””。

这是一个例子:

library(lme4)
A=c(30,39,52,58,90,102,109,120)
B <- c(10,11,12,13,14,16,17,18)
C=c(rep(1,4),rep(2,4))

abc <- function(){
model.data <- data.frame(A=A,B=B,C=C)
model.mixed<-lmer(A~B+(B|C),data=model.data)
return(summary(model.mixed)$coefficients[,1])
}

foreach(i = 1:3, .combine = rbind) %dopar% abc()

非常感谢您对此的任何帮助。

4

0 回答 0