<span style="font-size: medium;"><strong><span style="color: #0000ff;">Muito obrigado, funcionou! Confesso que sou uma ruim de programação!</span></strong></span><br /> <br /><br />
<hr style="border-top: 1px solid #ccc;" />
Em 11/09/2011 23:39, <strong>Leonard de Assis < assis.leonard@gmail.com ></strong> escreveu:<br /> test1=function(){<br /> U=runif(3*10^4)<br /> U=matrix(data=U,nrow=3) #matrix for sums<br /> X=-log(U) #uniform to exponential<br /> X=2* apply(X,2,sum) #sum up to get chi squares<br /> }<br /> system.time(test1())<br /> <br /> Código certo.<br /> Repare a última linha<br />
<pre class="moz-signature">[]s
Leonard de Assis
assis leonard gmail com
</pre>
<br /> Em 11/09/2011 21:58, Mauro Sznelwar escreveu:
<blockquote cite="mid:002901cc70e7$16f36d30$6400a8c0@mauro">
<div><span style="font-family: Arial; color: #0000ff;">Eu fiz, mas continua não dando certo, qual o erro?</span></div>
<div><span style="font-family: Arial; font-size: x-small;">> test1=function(){<br /> + U=runif(3*10^4)<br /> + U=matrix(data=U,nrow=3) #matrix for sums<br /> + X=-log(U) #uniform to exponential<br /> + X=2* apply(X,2,sum) #sum up to get chi squares<br /> + }<br /> > system.time(test1)<br /> usuário sistema decorrido <br /> 0 0 0 <br /> > </span></div>
<blockquote style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<div style="FONT: 10pt arial"></div>
<div></div>
O test1 e test2 dele são funções, e não variáveis... tu tem que criar funções com esses passos e dai sim usar o system.time()
<div></div>
<div></div>
<div>[]'s<br /> <br />
<div class="gmail_quote">2011/9/11 Mauro Sznelwar <span dir="ltr"><<a href="mailto:sznelwar@uol.com.br">sznelwar@uol.com.br</a>></span><br />
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">
<div>
<div><span style="font-family: Arial; font-size: x-small;"><span style="font-family: CMTT10; font-size: x-small;">
<p align="justify"><span style="color: #0000ff; font-size: small;">Pessoal, eu tenho esta simulação que quero testar a eficiência em relação ao rchisq, mas não estou chegando no resultado do livro. Alguém poderia dizer o que estou fazendo de errado?</span></p>
<p align="left">U=runif(3*10^4)</p>
<p align="left">U=matrix(data=U,nrow=3) #matrix for sums</p>
<p align="left">X=-log(U) #uniform to exponential</p>
<p align="left">X=2* apply(X,2,sum) #sum up to get chi squares</p>
</span><span style="font-family: CMTT10; font-size: x-small;"><span style="font-family: CMTT10; font-size: x-small;">
<p>test1=X</p>
<p>test2=rchisq(10^4,df=6)</p>
</span><span style="font-family: CMSS10; font-size: x-small;"> </span>system.time(test1);system.time(test2)<br /> usuário sistema decorrido <br /> 0 0 0 <br /> usuário sistema decorrido <br /> 0 0 0 <br />
<p align="left"><span style="color: #0000ff; font-size: small;">No livro tem este resultado:</span></p>
<p align="left">system.time(test1());system.time(test2())</p>
<p align="left">user system elapsed</p>
<p align="left">0.104 0.000 0.107</p>
<p align="left">user system elapsed</p>
<p>0.004 0.000 0.004</p>
</span></span></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>
</div>
<p> </p>
<hr />
_______________________________________________<br /> R-br mailing list<br /> <a class="moz-txt-link-abbreviated" href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br /> <a class="moz-txt-link-freetext" 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 class="moz-txt-link-freetext" 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.</blockquote>
<br /> <fieldset class="mimeAttachmentHeader"></fieldset> <br />
<pre>_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" 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>
Leia o guia de postagem (<a class="moz-txt-link-freetext" 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.</pre>
</blockquote>
<br />