search

lem-usp / EvolQG

Tools for Evolutionary Quantitative Genetics
http://cran.r-project.org/web/packages/evolqg/
Other
10 stars 8 forks source link

SRD.list #120

Closed joelmcg closed 5 years ago

joelmcg commented 5 years ago

I have been playing around a bit with SRD today, and I've found that the list-based method can't be set to anything but 1000 iterations. In this line, the default method gets called without passing the iterations parameter:

CompareToN <- function(n) llply(cov.x[(n+1):n.matrix], function(x) {SRD(x, cov.x[[n]])}, .parallel = parallel)

I think this could be fixed this way:

CompareToN <- function(n) llply(cov.x[(n+1):n.matrix], function(x) {SRD(x, cov.x[[n]], iterations = iterations)}, .parallel = parallel)

diogro commented 5 years ago

Thanks for the fix! Included in 7d69f1c

joelmcg commented 5 years ago

Awesome, thanks!