function B = transposeme(A) %TRANSPOSE 此处显示有关此函数的摘要 % 此处显示详细说明 [m,n]=size(A); B=rand(n,m); for a=1:m for b=1:n if ~isreal(A(a,b)) B(b,a)=conj(A(a,b)); else B(b,a)=A(a,b); end end end