mat格式转换到libsvm数据格式

mat格式转换到libsvm数据格式 mat format to libsvm

clc;
clear all;

%-------------------mat文件转换为txt文件------------------------
[filename pathname] = uigetfile（ {‘*.mat‘ ...
‘数据文件（*.mat）‘; ‘*.*‘ ‘所有文件 （*.*）‘} ‘选择数据文件‘）;
try
S=load（[pathname filename]）;
fieldName = fieldnames（S）;
str = cell2mat（fieldName）;
B = getfield（Sstr）;
[mn] = size（B）;
[filename pathname] = uiputfile（{‘*.txt;*.dat‘ ‘数据文件（*.txt;*.dat）‘;‘*.*‘‘所有文件 （*.*）‘}‘保存数据文件‘）;

fid = fopen（[pathname filename]‘w‘）;
if（fid~=-1）
for k=1:m
fprintf（fid‘%3d‘B（k1））;
for kk = 2:n
fprintf（fid‘\t%d‘（kk-1））;
fprintf（fid‘:‘）;
fprintf（fid‘%d‘B（kkk））;
end
fprintf（fid‘\n‘）;
end
fclose（fid）;
else
msgbox（‘无法保存文件!‘）;
end
catch
msgbox（‘文件保存过程中出错!‘‘出错了...‘‘error‘）;
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        770  2011-04-25 17:22  mat2txt.m

----------- ---------  ---------- -----  ----

                  770                    1