2016-04-22 67 views
0

我编写了一个for循环代码(见下面),以查找函数列表的mle。但是,寻找这些功能的可能性非常困难。因此,我想将代码传递给mcapply样式函数,以在不同内核上运行每次迭代。在R中的函数列表上找到mle

代码

fitted.c<-list() 
for(i in 1:length(functions.c)){ 
fitted.c[[i]]<-find.mle(functions.c[[i]], p.start.c) 
} 

在functions.c是的函数的列表。

任何建议,可以理解 最佳,奥斯卡

回答

1

这是一个愚蠢的事情,只是做:

mclapply(functions.c, function(i){ 
p.start.c <- c(0.1, 0, 0.01, 0.01) 
fit<-find.mle(i, p.start.c) 

和工作完全

最好把所有