[barcelona]

假定已知矩阵为a，则矩阵a中实数的位置x=find(imag(a)==0),得到的x的结果不是矩阵标准的行列形式，但是可以直接根据x获得相应位置上的实数数据b=a(x)；如果要得到实数在矩阵中的确切行列信息，设已知矩阵为NXM形式，则由x到行列的转换满足以下关系：
列信息 c=x/N（x/N为整数时） or fix(x/N)+1;行信息r=N（x/N为整数） or x-fix(x/N)XN;
m文件程序简单实现：
x=find(imag(a)==0);

for jj=1:length(x)
b(jj)=a(jj);
end

z=[x;b];%%z的第一行表示实数位置；第二行表示相应位置下的实数值%%