Pessoal fiz um programa bem simples para que que a cada interação o R inverta uma matriz. Fiz isso no Windows 7 64 bits e no Ubuntu 11.10 64 bits no mesmo computador. simulei 5 vezes no windows e 5 vezes no linux. O número de simulações não tem nenhum respaldo estatístico, fiz por conveniência. O programa é:<br>
<br>rm(list = ls (all = TRUE))
<br>tempo_inicial = Sys.time()
<br>M = matrix(abs(runif(10000,7,1000000)),100,100)
<br>inversas <- function(A,numero){
<br>     i = NULL
<br>     for(i in 1:numero){
<br>         A = solve(A)
<br>     }                 
<br>}
<br>inversas(M,10000)
<br>tempo_final = Sys.time()
<br>tempo = tempo_final - tempo_inicial
<br>tempo
<br> <br><br>No final me estranhou porque no Windows levou em todas as vezes 8 segundos a menos que no Linux. O que pode ser?<br><br>Os tempos em segundos:<br><br>Windows 7 64 bits<br>Tempos: 20,729; 20,695; 20,677; 20,663<br>
<br>Linux Ubuntu 11.10 64 bits:<br>Tempos: 28,05745; 28,04319; 28,0124; 28;0885<br><br>A matriz M aí apresentada na terceira linha de código é uma matriz aleatória mas em que a cada vez que o script é lido ela muda, contudo eu fixei para os dois sistemas a mesma matriz. Vale salientar que isso não passa de uma tentativa simples de verificar os tempos de execução de um código.<br>
<br>-- <br><font color="#000099">Saudações,</font><div><font color="#000099">Pedro Rafael Diniz Marinho.</font></div><div><font color="#000099">Estatístico - Secretaria de Estado da Saúde - PB.</font></div><div><font color="#000099"><br>
</font></div><br>