Aqui o sapply foi tão rápido quanto o lapply:

message(sprintf('sapply...........: %2.4f', t0[3])) sapply...........: 15.8400 message(sprintf('for() usual......: %2.4f', t1[3])) for() usual......: 102.1240 message(sprintf('for() pre-aloc..: %2.4f', t2[3])) for() pre-aloc..: 18.1090 message(sprintf('do.call+lapply: %2.4f', t3[3])) do.call+lapply: 16.1680

2011/6/14 Junior Beleti <beleti.junior@gmail.com>:

Muito obrigado pelas dicas sobre como visualizar o fonte das funções "apply". E obrigado Benilton pela explicação que foi esclarecedora.

Vou continuar minhas pesquisas sobre programação paralela no R. Abraço a todos..

-- Carlos Roberto Beleti Junior Mestrado em Ciência da Computação Departamento de Informática Universidade Estadual de Maringá

_______________________________________________ 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.