[R-br] aumentar a velocidade

[Ze Henrique]

Boa tarde pessoal,

estou trabalhando com a função disponível no link <
http://morotalab.org/Mrode2005/relmat/quass.txt>
e gostaria de aumentar a velocidade de execução da funcão.
Qualquer opinião é bem vinda.

Segue abaixo um CMR:

sire <- rep(1:50,each=50)
dam <- rep(1:50,50)

s <- c(rep(0,50),sire)
d = c(rep(0,50),dam)

system.time(quass(p,m))

Desde já obrigado
-- 
*José Henrique Soler Guilhen*
Mestrando em Genética e Melhoramento
Universidade Federal do Espírito Santo - CCAUFES
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150226/cd947544/attachment.html>