max/ourMELONS
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Merge branch 'addToSummary' into translate-indMix

Browse source
This commit is contained in:
Waldir Leoncio 2020-10-19 14:14:35 +02:00
commit 07912ccf1f
1 changed files with 0 additions and 20 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
R/indMix.R
View file

@ -1191,26 +1191,6 @@ indMix <- function(c, npops, dispText) {
# %--------------------------------------------------------------------------
# function [partitionSummary, added] = addToSummary(logml, partitionSummary, worstIndex)
# % Tiedet<65><74>n, ett<74> annettu logml on isompi kuin huonoin arvo
# % partitionSummary taulukossa. Jos partitionSummary:ss<73> ei viel<65> ole
# % annettua logml arvoa, niin lis<69>t<EFBFBD><74>n worstIndex:in kohtaan uusi logml ja
# % nykyist<73> partitiota vastaava nclusters:in arvo. Muutoin ei tehd<68> mit<69><74>n.
# apu = find(abs(partitionSummary(:,2)-logml)<1e-5);
# if isempty(apu)
# % Nyt l<>ydetty partitio ei ole viel<65> kirjattuna summaryyn.
# global PARTITION;
# npops = length(unique(PARTITION));
# partitionSummary(worstIndex,1) = npops;
# partitionSummary(worstIndex,2) = logml;
# added = 1;
# else
# added = 0;
# end
# %--------------------------------------------------------------------------
# function inds = returnInOrder(inds, pop, globalRows, data, ...
# adjprior, priorTerm)
# % Palauttaa yksil<69>t j<>rjestyksess<73> siten, ett<74> ensimm<6D>isen<65> on