annotate general/numerical/array/mmin.m @ 17:cb249ba61e9e

Moved from parent directory.
author samer
date Thu, 17 Jan 2013 13:21:46 +0000
parents db7f4afd27c5
children
rev   line source
samer@4 1 function t=mmin(A)
samer@4 2 % mmin - minimum over both dimensions
samer@4 3 %
samer@4 4 % mmin :: [[N,M]-A] -> A, 1..N, 1..M.
samer@4 5 if nargout==1, t=min(A(:));
samer@4 6 else
samer@4 7 [t1,i1]=min(A,[],1);
samer@4 8 [t2,i2]=min(t1,[],2);
samer@4 9 t=t2;
samer@4 10 if nargout==3, i=i1(i2); j=i2;
samer@4 11 elseif nargout==2, i=[i1(i2) i2]; end
samer@4 12 end