Mercurial > hg > ishara

view general/numerical/array/mmax.m @ 16:db7f4afd27c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rearranging numerical toolbox.
author samer
date Thu, 17 Jan 2013 13:20:44 +0000
parents general/numerical/mmax.m@e44f49929e56
children
line wrap: on
line source
function [t,i,j]=mmax(A)
% mmax - maximum over both dimensions
%
% mmax :: [[N,M]-A] -> A, 1..N, 1..M.

if nargout==1, t=max(A(:));
else
	[t1,i1]=max(A,[],1);
	[t2,i2]=max(t1,[],2);
	t=t2;
	if nargout==3, i=i1(i2); j=i2; 
	elseif nargout==2, i=[i1(i2) i2]; end
end