Cleanup of commented-out code
This commit is contained in:
parent
d55b618c75
commit
0fec3ab096
1 changed files with 0 additions and 17 deletions
|
|
@ -381,20 +381,3 @@ greedyMix <- function(
|
|||
if (file.exists('baps4_output.baps')) file.remove('baps4_output.baps')
|
||||
}
|
||||
}
|
||||
|
||||
# %--------------------------------------------------------------------------
|
||||
|
||||
|
||||
# function [suurin, i2] = arvoSeuraavaTila(muutokset, logml)
|
||||
# % Suorittaa yksil<69>n seuraavan tilan arvonnan
|
||||
|
||||
# y = logml + muutokset; % siirron j<>lkeiset logml:t
|
||||
# y = y - max(y);
|
||||
# y = exp(y);
|
||||
# summa = sum(y);
|
||||
# y = y/summa;
|
||||
# y = cumsum(y);
|
||||
|
||||
# i2 = rand_disc(y); % uusi kori
|
||||
# suurin = muutokset(i2);
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue