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')
|
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