Mercurial > hg > ishara

annotate general/numerical/argmaxv.m @ 4:e44f49929e56

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Adding reorganised general toolbox, now in several subdirectories.
author samer
date Sat, 12 Jan 2013 19:21:22 +0000
parents
children
rev   line source
samer@4 1 function indices = argmaxv(v)
samer@4 2 % argmaxv - multidimensional index of maximal element of array
samer@4 3 %
samer@4 4 % argmaxv :: [Size:[[1,E]]->A] -> [[1,E]] :- numeric(A).
samer@4 5 %
samer@4 6 % Returns the first maximum in the case of ties.
samer@4 7
samer@4 8 [m i] = max(v(:));
samer@4 9 [ind{1:numdims(v)}]=ind2sub(size(v),i);
samer@4 10 indices=[ind{:}];