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><br></div><div><br></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="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><u></u>





<div bgcolor="#ffffff">
<div><font face="Arial" size="2"><font face="CMTT10" size="2">
<p align="justify"><font color="#0000ff" size="3">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?</font></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></font><font face="CMTT10" size="2"><font face="CMTT10" size="2">
<p>test1=X</p>
<p>test2=rchisq(10^4,df=6)</p></font><font face="CMSS10" size="2">
<p align="left"></p></font>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"><font color="#0000ff" size="3">No livro tem este resultado:</font></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></font></font></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>