Problem 42634. Minimum of each diagonal

Solution 1627665

Submitted on 14 Sep 2018 by HH

This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

Test	Status	Code Input and Output
1	Pass	assert(isempty(mindiag([])))
2	Pass	x = randi(100); assert(isequal(mindiag(x),x))
3	Pass	x = randi(100,100,1); assert(isequal(mindiag(x),x(end:-1:1)'))
4	Pass	x = randi(100,1,100); assert(isequal(mindiag(x),x))
5	Pass	x = eye(2); assert(isequal(mindiag(x),[0 1 0]))
6	Pass	x = magic(3); assert(isequal(mindiag(x),[4 3 2 1 6]))
7	Pass	x = flipud(hankel(1:1000)); assert(isequal(mindiag(x),[1:1000,zeros(1,1000-1)]))
8	Pass	x = toeplitz(1:1000); assert(isequal(mindiag(x),[1000:-1:1,2:1000]))
9	Pass	N = randi(1000); x = fliplr(toeplitz(1:N)); y = ones(1,2*N-1); y(2:2:end) = 2; assert(isequal(mindiag(x),y))
10	Pass	x = magic(10); x = x(:,1:3); assert(isequal(mindiag(x),[11 10 12 6 5 24 76 4 19 80 7 1]))
11	Pass	x = hankel(-4:0,0:-2:-16); assert(isequal(mindiag(x),[0 -2 -4 -6 -8 -10 -12 -14 -16 -14 -12 -10 -8]))