<div dir="ltr"><div dir="ltr" class="gmail_msg">Oi, Adriele.<div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg">Repare no código do Walmes que há duas soluções para você:</div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg">(i) Converter os valores que estão como character no momento de somá-los (dentro do loop); ou</div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg">(ii) Assim como para o exemplo ele criou uma matrix de character com base em valores numeric, você pode fazer o oposto com a sua:</div><div class="gmail_msg">new_data <- matrix( as.numeric(data[, 1:3]), ncol = 3 )<br class="gmail_msg"></div><div class="gmail_msg">Caso necessite de precisão maior que as casas decimais default, você pode aumentá-las com o options( digits = quantas_casas_decimais_voce_precisa )</div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg">Vai de você ver se vai utilizar novamente estes valores, aí pode ser mais interessante já converter o dado para numeric.<br><br></div><div class="gmail_msg">Abs,<br></div><div class="gmail_msg">Karina<br></div><div class="gmail_msg"><br></div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg">Abs,</div><div class="gmail_msg">Karina</div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg"><br class="gmail_msg"></div><div class="gmail_msg"><br class="gmail_msg"></div></div><br class="gmail_msg"><div class="gmail_quote gmail_msg"><div dir="ltr" class="gmail_msg">On Wed, Mar 1, 2017 at 9:55 AM Walmes Zeviani via R-br <<a href="mailto:r-br@listas.c3sl.ufpr.br" class="gmail_msg" target="_blank">r-br@listas.c3sl.ufpr.br</a>> wrote:<br class="gmail_msg"></div><blockquote class="gmail_quote gmail_msg" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr" class="gmail_msg"><div class="gmail_default gmail_msg" style="font-family:trebuchet ms,sans-serif"><span style="font-family:monospace,monospace" class="gmail_msg">x <- matrix(as.character(rnorm(100)), ncol = 10)<br class="gmail_msg">typeof(x)<br class="gmail_msg"><br class="gmail_msg">apply(x,<br class="gmail_msg">      MARGIN = 2,<br class="gmail_msg">      FUN = function(i) {<br class="gmail_msg">          sum(as.numeric(i))<br class="gmail_msg">      })<br class="gmail_msg"></span><br class="gmail_msg">À disposição.<br class="gmail_msg"></div><div class="gmail_default gmail_msg" style="font-family:trebuchet ms,sans-serif">Walmes.<br class="gmail_msg"></div>​<br class="gmail_msg"></div>
_______________________________________________<br class="gmail_msg">
R-br mailing list<br class="gmail_msg">
<a href="mailto:R-br@listas.c3sl.ufpr.br" class="gmail_msg" target="_blank">R-br@listas.c3sl.ufpr.br</a><br class="gmail_msg">
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" class="gmail_msg" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br class="gmail_msg">
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" class="gmail_msg" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</blockquote></div></div>