dataout.m

来自「这是一个支持向量机的工具」· M 代码 · 共 26 行

function dataout(da,fs,arg)
% output data da to a text file

[nr,nc] = size(da);
if fs==0
fs=['%2.5f '];
end

form=fs;
for i=1:nc-1 
form=[form fs];
end
form=[form '\n'];

if nargin>1
fid = fopen(arg,'w+');
else
fid = fopen('newdata.txt','w+');
end

fprintf(fid,form,da'); 
fclose(fid);

%fwrite(fid,temp,'integer*4');%'float32''real*4'  
%textread, fscanf(fid,'%5d'); %s
% da=da-repmat(mean(da,2),1,2);