<div dir="ltr">Éder,<div>Muito obrigado pela atenção. Pelo que observei aqui, isso soluciona o problema.<div>Grato,</div><div>Maurício</div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 26 de outubro de 2013 16:51, Éder Comunello <span dir="ltr"><<a href="mailto:comunello.eder@gmail.com" target="_blank">comunello.eder@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"><div>Maurício, boa tarde!</div><div><br></div><div>Analisando apenas a parte final do seu script, temos apenas um objeto 'repeticoes' que é atualizado/mudado a cada ciclo do 'for'. Ao final da execução vai sobrar apenas o resultado da última execução.</div>
<div class="im">
<div><br></div><div><div style="font-size:12.727272033691406px"><font face="courier new, monospace"><span style="font-size:small">"A saída de "repeticoes" é mostrada assim:</span><br></font></div></div><div>

<div><div style="font-size:12.727272033691406px"><font face="courier new, monospace">[[1]]</font></div><div style="font-size:12.727272033691406px"><font face="courier new, monospace">[1]  0.11926720 -0.06925387 -0.49590355"</font></div>

</div></div><div><br></div></div><div>A saída mostra que é impressa uma lista a cada rodada e para o que você precisa, devemos acumular as sucessivas saídas...</div><div><br></div><div>Uma forma não muito pensada, mas que deve funcionar:</div>

<div><br></div><div><div class="im"><div><font face="courier new, monospace">for(i in 1:ns) </font></div><div><font face="courier new, monospace">{</font></div><div><font face="courier new, monospace">          repeticoes <- replicate(1, geral(), simplify = FALSE)</font></div>

</div><div><font face="courier new, monospace">          if (i==1) rep=unlist(repeticoes) else rep=rbind(rep,unlist(repeticoes))</font></div><div><font face="courier new, monospace">}</font></div></div><div><font face="courier new, monospace">rep; colMeans(rep)</font></div>

<div><font face="arial, helvetica, sans-serif"><br></font></div><div><font face="arial, helvetica, sans-serif">Na primeira rodada o objeto 'rep' é o próprio 'repeticoes'. Nas sucessivas, agrega usando rbind(). O unlist() é pra desmontar a lista.</font></div>

<div><font face="arial, helvetica, sans-serif"><br></font></div><div><font face="arial, helvetica, sans-serif">Ao final você deverá ter um objeto 'rep' do tipo 'matrix' e </font><span style="font-family:arial,helvetica,sans-serif">então poderá usar </span><font face="courier new, monospace">colMeans(rep)</font><span style="font-family:arial,helvetica,sans-serif"> pra ter as médias por coluna.</span></div>

<div><span style="font-family:arial,helvetica,sans-serif"><br></span></div><div><span style="font-family:arial,helvetica,sans-serif">Não testei porque também estou no R 3.0. Mas acredito que vá funcionar...</span></div><div>

<span style="font-family:arial,helvetica,sans-serif"><br></span></div><div><span style="font-family:arial,helvetica,sans-serif">Atte.</span></div><span class="HOEnZb"><font color="#888888"><div><font face="arial, helvetica, sans-serif"><br>
</font></div><div><div style="font-size:12.727272033691406px">
<div>Éder Comunello</div></div></div></font></span></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></div>