<div dir="ltr">Alexandre,<div><br></div><div>Veja se o seguinte código te ajuda:</div><div><br></div><div>-------------------</div><div><br></div><div><div>bd   <- rnorm(10000) # Banco de dados</div><div>Nbsp <- 10 # Número de simulações</div><div><br></div><div>## Função para realização das simulações e armazenamento das informações</div><div><br></div><div>RES <- NULL</div><div><br></div><div>for(Nsim in 1:Nbsp){</div><div><br></div><div><span class="" style="white-space:pre">       </span>sample_bd <- sample(bd, 10)</div><div><span class="" style="white-space:pre">     </span>RES       <- cbind(rep(Nbsp, length(sample_bd)), sample_bd)</div><div><span class="" style="white-space:pre">  </span>write.table(RES, paste("sorteio", sprintf("%04d", Nsim), ".txt",  sep=""), row.names=F, col.names=F, append=T)</div><div><br></div><div>}</div></div></div><div class="gmail_extra"><br><div class="gmail_quote">2015-10-14 21:11 GMT-03:00 Alexandre Santos <span dir="ltr"><<a href="mailto:alexandresantosbr@yahoo.com.br" target="_blank">alexandresantosbr@yahoo.com.br</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><table cellspacing="0" cellpadding="0" border="0"><tbody><tr><td valign="top"><p>Boa noite Walmes,</p><p>         Não entendi um paste () dentro do nome a ser atribuido ao arquivo,  ficando "sorteio_"paste (nsim)".txt"?</p><p>Obrigado</p> <hr><table cellspacing="0" cellpadding="0" border="0"> <tbody> <tr> <td valign="top"> <div style="font-family:Roboto,sans-serif;color:#7e7d80"><b>De</b>:"Walmes Zeviani" <<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>><br><b>Data</b>:19:18 Qua, 14 de Out de PM<br><b>Assunto</b>:Re: [R-br]  Realização de sorteios e a cada processo geração de arquivos *txt individuais<br><br></div><span class=""> <div dir="ltr"><div class="gmail_default" style="font-family:trebuchet ms,sans-serif">Não serve fazer um paste() para compor o nome com atual valor do Nsim?<br clear="none"><br clear="none">À disposição?<br clear="none"></div><div class="gmail_default" style="font-family:trebuchet ms,sans-serif">Walmes.<div><br clear="none"></div></div><div>​</div></div></span><div style="padding:1.5em 0.5em 0.5em 1.2em;word-wrap:break-word"><span class=""><div>_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a shape="rect">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a shape="rect" 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 clear="none">Leia o guia de postagem (<a shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a></div></span>) e forne� c�igo m�imo reproduz�el.</div></td>  </tr>   </tbody>   </table></td></tr></tbody></table><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" rel="noreferrer" 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" rel="noreferrer" 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 class="gmail_signature"><div dir="ltr">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div></div>
</div>