ysavetofile.m

来自「能方便的矩阵进行行列的线性扩展,并把生的矩阵存储也很方便」· M 代码 · 共 16 行

function YSaveToFile(fout,IMatrix)
%By Yang
%fout    输出的文件名
%IMatrix 需要输出到文件的数组

[rownum,colnum]=size(IMatrix);
fpoc=fopen(fout,'wt');
fprintf(fpoc,'%d\t%d\n',rownum,colnum);%记录行数，列数
for k=1:rownum;
   for j=1:colnum-1;
    fprintf(fpoc,'%f\t',IMatrix(k,j));
   end;
    fprintf(fpoc,'%f\n',IMatrix(k,j+1));
end;
fclose(fpoc);