<font color="#000066"><font face="courier new,monospace">Maria,</font></font><div><font color="#000066"><font face="courier new,monospace"><br></font></font></div><div><font color="#000066"><font face="courier new,monospace">Um pedaço de script que talvez te ajude.</font></font></div>

<div><font color="#000066"><font face="courier new,monospace"><br></font></font></div><div><font face="arial, sans-serif"><div>data <- as.data.frame(cbind(c(20:60),c(30:70),c(40:80)))</div><div>data</div><div>B = 500</div>

<div>medias <- matrix(NA,ncol=3,nrow=B)</div><div>for(i in 1:B){</div><div>  medias[i,] <- colMeans(data[sample(1:nrow(data),nrow(data)-1,T),]) # bootstrap com todas os dados -1 uma linha</div><div>  }</div><div>medias</div>

<div><br></div></font></div><div><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Dr. Pedro Emmanuel A. A. do Brasil</font><div><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Curriculum Lattes: 

<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span> <br>Instituto de Pesquisa Clínica Evandro Chagas<br>Fundação Oswaldo Cruz<br>

Rio de Janeiro - Brasil<br>Av. Brasil 4365, <br>CEP 21040-360,<br>Tel 55 21 3865-9648<br>email: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>email: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>

<br>---Apoio aos softwares livres<br><a href="http://www.zotero.org" target="_blank">www.zotero.org</a> - gerenciamento de referências bibliográficas. <br><a href="http://www.broffice.org" target="_blank">www.broffice.org</a> ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> - textos, planilhas ou apresentações.<br>

<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> - entrada de dados.<br><a href="http://www.r-project.org" target="_blank">www.r-project.org</a> - análise de dados.<br><a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> - sistema operacional</font></div>

<br>

<div class="gmail_extra"><br><br><div class="gmail_quote">Em 22 de abril de 2012 23:20, Maria Papa <span dir="ltr"><<a href="mailto:mceliamat@yahoo.com.br" target="_blank">mceliamat@yahoo.com.br</a>></span> escreveu:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="font-size:10pt;font-family:arial,helvetica,sans-serif"><div><span>Olá Pessoal, boa noite</span></div>

<div>

</div><div>Estou tentando, sem sucesso, realizar uma reamostragem bootstrap para médias de 3 amostras estão organizados em uma matriz na qual, que sendo cada coluna representa uma amostra. Porém, a cada reamostragem, eu preciso que seja feita para as três amostras, ou seja, quando um dado for selecionado para formar a amostra bootstrap, deve ser retirada a linha toda.  O resultado final deve ser 3  médias reamostradas, que foram obtidas em um único processo de reamostragem.

 Alguém sabe como fazer isso no R? Eu consegui somente quando eu realizo 3 procedimentos de <span>reamostragem</span> distintos. </span></div><div><span></span> </div><div><span>Desde já agradeço a todos</span></div><div>

<span></span> </div><div><span>célia</span></div><div></div><div> </div></div></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></div>