<div dir="ltr">Agradece pela ajuda Vinicius e Elias.<div><br></div><div>Vou dar uma estudada melhor, pois sou bem leigo no assunto.</div><div><br></div><div>Obrigado.</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">
Em 2 de julho de 2014 12:08, Elias T. Krainski <span dir="ltr"><<a href="mailto:eliaskrainski@yahoo.com.br" target="_blank">eliaskrainski@yahoo.com.br</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div bgcolor="#FFFFFF" text="#000000">
sobre operacoes matriciais em paralelo<br>
<a href="https://stat.ethz.ch/pipermail/r-sig-debian/2011-November/001722.html" target="_blank">https://stat.ethz.ch/pipermail/r-sig-debian/2011-November/001722.html</a><br>
ou seja, se vc tiver isso no sistema x%*%x ou crossprod(x) fazem
isso em paralelo<br>
<br>
lembrem que tanto %*% quanto crossprod() usam biblioteca Fortran de
alto desempenho (dificilmente bativeis por algum codigo C). <br>
ainda: crossprod(x) e' mais rapido que t(x)%*%x<br>
se x e' simetrica crossprod(x) demanda metade do tempo de x%*%x (no
meu laptop)<div><div class="h5"><br>
<br>
<br>
<div>On 02/07/14 11:03, Ze Henrique wrote:<br>
</div>
<blockquote type="cite">
<div dir="ltr">Como eu poderia definir este processamento
paralelo?
<div><br>
</div>
<div>Obrigado Vinicius.</div>
<div><br>
<div><br>
</div>
<div><br>
</div>
</div>
</div>
<div class="gmail_extra"><br>
<br>
<div class="gmail_quote">Em 1 de julho de 2014 18:20, Vinicius
Brito Rocha <span dir="ltr"><<a href="mailto:viniciusbritor@gmail.com" target="_blank">viniciusbritor@gmail.com</a>></span>
escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Zé,
<div><br>
</div>
<div>minha recomendação é fazer isso em paralelo.</div>
<div><br>
</div>
<div>Abs</div>
<div>
<br>
</div>
<div>Vinicius</div>
</div>
<div class="gmail_extra"><br>
<br>
<div class="gmail_quote">Em 1 de julho de 2014 15:08, Ze
Henrique <span dir="ltr"><<a href="mailto:jhguilhen@gmail.com" target="_blank">jhguilhen@gmail.com</a>></span>
escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div>
<div>
<div dir="ltr">
<div>Boa tarde pessoal,</div>
<div><br>
</div>
<div>estou trabalhando com matrizes de dimensão
de 3000 x 3000 em um processo iterativo e a
multiplicação das mesmas tem tomado muito
tempo.</div>
<div><br>
</div>
<div>
Tentei utilizar a biblioteca RcppArmadillo mas
não obtive ganhos de tempo. Alguém sabe me
dizer o porque?</div>
<div><br>
</div>
<div>Toda ajuda é bem vinda para acelerar a
multiplicação destas matrizes.</div>
<div><br>
</div>
<div><br>
</div>
<div>Segue abaixo um CMR:</div>
<div><br>
</div>
<div>require(Rcpp)</div>
<div>require(RcppArmadillo)</div>
<div><br>
</div>
<div>cppFunction(depends = "RcppArmadillo",</div>
<div> 'arma::mat prodM(arma::mat&
a, arma::mat& b) { </div>
<div> return(a * b); }'</div>
<div>)</div>
<div><br>
</div>
<div>mat <- matrix(rnorm(9e+06,30),nc=3000)</div>
<div><br>
</div>
<div>#Código em C </div>
<div>system.time(prodM(mat,mat))</div>
<div><br>
</div>
<div>#Código em R</div>
<div>system.time(mat%*%mat)</div>
<span><font color="#888888">
<div><br>
</div>
-- <br>
<div style="text-align:center"><font><b>José
Henrique Soler Guilhen</b></font><br>
<font>Graduando em Agronomia</font><br>
</div>
<div style="text-align:center"><font style="font-size:10pt" face="Verdana"><font style="font-size:10pt">Universidade
Federal do Espírito Santo - CCAUFES</font></font><br>
</div>
<font style="font-size:10pt" face="Verdana"><br>
</font>
</font></span></div>
<br>
</div>
</div>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo reproduzível.<span><font color="#888888"><br>
</font></span></blockquote>
</div>
<span><font color="#888888"><br>
<br clear="all">
<div><br>
</div>
-- <br>
<div dir="ltr"><i>Vinicius Brito Rocha.</i><br>
<i style="font-weight:bold">Estatístico e Atuário </i><i style="font-weight:bold"><br>
M.Sc. Engenharia de Produção/PO</i><br>
<br>
<br>
</div>
</font></span></div>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo reproduzível.<br>
</blockquote>
</div>
<br>
<br clear="all">
<div><br>
</div>
-- <br>
<div style="text-align:center"><font><b>José Henrique Soler
Guilhen</b></font><br>
<font>Graduando em Agronomia</font><br>
</div>
<div style="text-align:center"><font style="font-size:10pt" face="Verdana"><font style="font-size:10pt">Universidade
Federal do Espírito Santo - CCAUFES</font></font><br>
</div>
<font style="font-size:10pt" face="Verdana"><br>
</font>
</div>
<br>
<fieldset></fieldset>
<br>
<pre>_______________________________________________
R-br mailing list
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
</div></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br>
<div style="text-align:center"><font><b>José Henrique Soler Guilhen</b></font><br><font>Graduando em Agronomia</font><font style="font-size:10pt" face="Verdana"></font><br></div><div style="text-align:center"><font style="font-size:10pt" face="Verdana"><font style="font-size:10pt">Universidade Federal do Espírito Santo - CCAUFES</font></font><br>
</div><font style="font-size:10pt" face="Verdana"><br></font>
</div>