Translated clearGlobalVars()
This commit is contained in:
parent
390af9c65a
commit
743c39afba
2 changed files with 7 additions and 11 deletions
7
R/clearGlobalVars.R
Normal file
7
R/clearGlobalVars.R
Normal file
|
|
@ -0,0 +1,7 @@
|
||||||
|
clearGlobalVars <- function() {
|
||||||
|
COUNTS <- SUMCOUNTS <- PARTITION <- POP_LOGML <- vector() # placeholders
|
||||||
|
COUNTS <<- vector()
|
||||||
|
SUMCOUNTS <<- vector()
|
||||||
|
PARTITION <<- vector()
|
||||||
|
POP_LOGML <<- vector()
|
||||||
|
}
|
||||||
|
|
@ -358,17 +358,6 @@ greedyMix <- function(
|
||||||
}
|
}
|
||||||
|
|
||||||
# %-------------------------------------------------------------------------------------
|
# %-------------------------------------------------------------------------------------
|
||||||
# %-------------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# function clearGlobalVars
|
|
||||||
|
|
||||||
# global COUNTS; COUNTS = [];
|
|
||||||
# global SUMCOUNTS; SUMCOUNTS = [];
|
|
||||||
# global PARTITION; PARTITION = [];
|
|
||||||
# global POP_LOGML; POP_LOGML = [];
|
|
||||||
|
|
||||||
# %--------------------------------------------------------------------------
|
|
||||||
|
|
||||||
|
|
||||||
# function [partitionSummary, added] = addToSummary(logml, partitionSummary, worstIndex)
|
# function [partitionSummary, added] = addToSummary(logml, partitionSummary, worstIndex)
|
||||||
# % Tiedet<65><74>n, ett?annettu logml on isompi kuin huonoin arvo
|
# % Tiedet<65><74>n, ett?annettu logml on isompi kuin huonoin arvo
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue