This commit is contained in:
Waldir Leoncio 2020-07-14 14:52:04 +02:00
parent 854c120916
commit a8e6585d39

View file

@ -1,5 +1,5 @@
newGetDistances <- function(data, rowsFromInd) {
ninds <- max(data[, end])
ninds <- max(data[, ncol(data)])
nloci <- size(data, 2) - 1
riviLkm <- choose(ninds, 2)