Syntax fix (#25)
This commit is contained in:
parent
15da6cdced
commit
843a929938
1 changed files with 1 additions and 1 deletions
|
|
@ -7,7 +7,7 @@ poistaTyhjatPopulaatiot <- function(npops) {
|
||||||
LOGDIFF <- LOGDIFF[, notEmpty]
|
LOGDIFF <- LOGDIFF[, notEmpty]
|
||||||
|
|
||||||
for (n in 1:length(notEmpty)) {
|
for (n in 1:length(notEmpty)) {
|
||||||
apu <- matlab2r::find(PARTITION == notEmpty(n))
|
apu <- matlab2r::find(PARTITION == notEmpty[n])
|
||||||
PARTITION[apu] <- n
|
PARTITION[apu] <- n
|
||||||
}
|
}
|
||||||
npops <- length(notEmpty)
|
npops <- length(notEmpty)
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue