<html>
  <head>
    <meta content="text/html; charset=ISO-8859-1"
      http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    sobre operacoes matriciais em paralelo<br>
<a class="moz-txt-link-freetext" href="https://stat.ethz.ch/pipermail/r-sig-debian/2011-November/001722.html">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)<br>
    <br>
    <br>
    <div class="moz-cite-prefix">On 02/07/14 11:03, Ze Henrique wrote:<br>
    </div>
    <blockquote
cite="mid:CAHi1An-a=DPVZ2-C0dbUO-hUgOxTASyvaS9e_H858BPh-dGLSg@mail.gmail.com"
      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 moz-do-not-send="true"
              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 moz-do-not-send="true"
                    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 class="h5">
                      <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 moz-do-not-send="true"
                    href="mailto:R-br@listas.c3sl.ufpr.br"
                    target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
                  <a moz-do-not-send="true"
                    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 moz-do-not-send="true"
                    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
                    class="HOEnZb"><font color="#888888"><br>
                    </font></span></blockquote>
              </div>
              <span class="HOEnZb"><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 moz-do-not-send="true"
              href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
            <a moz-do-not-send="true"
              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 moz-do-not-send="true"
              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 class="mimeAttachmentHeader"></fieldset>
      <br>
      <pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
    </blockquote>
    <br>
  </body>
</html>