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

View file

@ -4,7 +4,7 @@
\alias{laskeMuutokset4} \alias{laskeMuutokset4}
\title{laskeMuutokset4} \title{laskeMuutokset4}
\usage{ \usage{
laskeMuutokset4(osuus, osuusTaulu, omaFreqs, logml, COUNTS) laskeMuutokset4(osuus, osuusTaulu, omaFreqs, logml, COUNTS = matrix(0))
} }
\arguments{ \arguments{
\item{osuus}{osuus} \item{osuus}{osuus}