1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
|
%% file=strcat(strDir,strGB,'\',strGB,strGBUC,strGBUCSize,strSuffix1) fid=fopen(file,'r'); if fid<0 warndlg('打开文件失败!'); return; else col=13; %column, 列,参数有13列 FormatString=repmat('%f ',1,col); rowtm=textscan(fid,FormatString,1,'HeaderLines',3) %row, 行。获取第四行数据,即原子个数 row=rowtm{1,1}; out =cell2mat(textscan(fid,FormatString,row,'HeaderLines',9)); %从10行开始读取row*col的矩阵数据 ;cell类型装换成数组类型 end msgbox('文件读取成功!'); if fclose(fid)==0 msgbox('文件关闭成功!'); else warndlg('关闭文件失败!'); end
|