Syntax fix (#25)

This commit is contained in:
Waldir Leoncio 2023-08-09 15:11:54 +02:00
parent 2739442541
commit 85c8c01816

View file

@ -138,7 +138,7 @@ indMix <- function(c, npops, counts = NULL, sumcounts = NULL, max_iter = 100L, d
message(paste("Performing steps:", as.character(roundTypes)))
}
for (n in seq_len(roundTypes)) {
for (n in seq_along(roundTypes)) {
round <- roundTypes[n]
kivaluku <- 0