[R-br] Criação de função fortran em pacote (base)

Mauro Sznelwar sznelwar em uol.com.br
Sexta Fevereiro 24 21:55:24 BRST 2012


Eu não encontrei esta função mclapply, precisa de alguma bibliotéca para consegui-la?


  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)


  a[[1]]


  abs
  Paulo Nogueira Starzynski



  Em 24 de fevereiro de 2012 00:33, Junior Beleti <beleti.junior em gmail.com> escreveu:

    Boa noite Benilton.


    Vi suas recomendações, mas veja que no momento precisaria apenas chamar uma 
    mesma 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 de 
    compilaçã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.
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120224/675ed8f6/attachment.html>


Mais detalhes sobre a lista de discussão R-br