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 <[email protected]>:
> 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
> [email protected]
> 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.
>
_______________________________________________
R-br mailing list
[email protected]
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.
