<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><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>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><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><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><div><font face="arial, helvetica, sans-serif"><br></font></div><div><div style="font-size:12.727272033691406px">
<div>Éder Comunello</div></div></div></div>