>> A = [14 21 20 61 28 20 2 75 45 94];R = [];for k = 1:length(A) a = (A-A(k)*ones(1,length(A)))>0; mi = sum(a(k:end)); R = [R mi];end;RR = 8 5 5 2 3 3 3 1 1 0