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)
|
||||
# % Tiedet<65><74>n, ett?annettu logml on isompi kuin huonoin arvo
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue