It should be OK for Z to be NULL. This currently triggers an issue on initialCounts(), which should be fixed
This commit is contained in:
parent
372891fbe1
commit
177685b6a2
1 changed files with 11 additions and 13 deletions
|
|
@ -88,7 +88,6 @@ indMix <- function(c, npops, counts = NULL, sumcounts = NULL, max_iter = 100L, d
|
|||
}
|
||||
ninds <- size(rows, 1)
|
||||
|
||||
if (!is.null(Z)) {
|
||||
initialPartition <- admixture_initialization(initData, npops, Z)
|
||||
sumcounts_counts_logml <- initialCounts(
|
||||
initialPartition, data, npops, rows, noalle, adjprior
|
||||
|
|
@ -102,7 +101,6 @@ indMix <- function(c, npops, counts = NULL, sumcounts = NULL, max_iter = 100L, d
|
|||
apu <- rows[i]
|
||||
PARTITION[i] <- initialPartition[apu[1]]
|
||||
}
|
||||
}
|
||||
|
||||
COUNTS <- counts
|
||||
SUMCOUNTS <- sumcounts
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue