Improved global variable handling

This commit is contained in:
Waldir Leoncio 2020-01-14 13:44:18 +01:00
parent f8ca66f827
commit a21d247040
2 changed files with 3 additions and 2 deletions

View file

@ -9,7 +9,8 @@
#' @param logml logml
#' @param COUNTS COUNTS
#'
laskeMuutokset4 <- function (osuus, osuusTaulu, omaFreqs, logml, COUNTS) {
laskeMuutokset4 <- function (osuus, osuusTaulu, omaFreqs, logml,
COUNTS = matrix(0)) {
npops <- dim(COUNTS)[3]
notEmpty <- osuusTaulu > 0.005
muutokset <- zeros(npops)