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
|