Junior,
não sei se entendi totalmente seu problema, mas acho que não tem a ver com o paralelismo e sim com o retorno do mclapply.
Tente assim:
a<-mclapply(1:1, function(i) {
g1 <- mvrnorm(n=1, mat.cokri[[1]][1:2601],m1)
g2 <- mvrnorm(n=1, mat.cokri[[1]][1:2601],m2)
g3 <- mvrnorm(n=1, mat.cokri[[1]][2602:5202],m3)
g4 <- mvrnorm(n=1, mat.cokri[[1]][2602:5202],m4)
cbind(g1,g2,g3,g4)
},mc.cores=4)
Boa noite Benilton.Vi suas recomendações, mas veja que no momento precisaria apenas chamar umamesma função (no caso, eigen.f) várias vezes, de forma paralela.Gostaria de saber da possibilidade da criação de uma função com nome (eigen2.f),por exemplo, apenas para que fossem efetuados testes.Já tentei a criação de tal função, mas quando compilo o R, aparece um erro decompilação.Também tentei fazer a chamada a função eigen.f por meio apenas de diversas chamadas,por exemplo:mclapply(1:1, function(i) {g1 <- mvrnorm(n=1, mat.cokri[[1]][1:2601],m1)g2 <- mvrnorm(n=1, mat.cokri[[1]][1:2601],m2)g3 <- mvrnorm(n=1, mat.cokri[[1]][2602:5202],m3)g4 <- mvrnorm(n=1, mat.cokri[[1]][2602:5202],m4)},mc.cores=4)Mas o processador efetua apenas chamada a cada vez, mesmo utilizando a função mclapply.Alguma sugestão?Obrigado, Carlos Beleti.
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.