order.m

来自「力学计算 力学计算 力学计算 力学计算 力学计算」· M 代码 · 共 11 行

function by=order(a)
[o,k]=size(a);
c=sort (a,2);
for n=1:k
    for m=1:k
        if c(2,n)==a(2,m);
            by(:,n)=a(:,m);
        end
    end
end