matlab處理text文檔格式問題

%處理上述text文檔格式問題文檔格式要求‘%5d%-5s%5s%5d%8.3f%8.3f%8.3f%’
clc
clear
fid=importdata(‘F:\ergou.txt’);%括號中爲文件所在位置
textdata=fid.textdata;
data=fid.data;
[m1,n1]=size(data);%文件行數
[m2,n2]=size(textdata);

for i=1:m1
for j=1:n1+n2
if (j==1)
B{i,j}=str2double(textdata{i,j}); %把第一列識別爲cell型的數據轉換成double
end
if (j<4&&j>1)
B{i,j}=textdata{i,j}; %把第二列與第三列cell型數據複製
end
if (j>3)
B{i,j}=data(i,j-3); %剩下的識別爲double型數據複製到B中
end
end
end
fileID = fopen(‘F:\Ly1.txt’,’wt’); %輸出文件位置權限設爲wt，設爲W時換行符不起作用
formatSpec = ‘%5d%-5s%5s%5d%8.3f%8.3f%8.3f\n’; %輸出文件格式
[nrows,ncols] = size(B);
for row = 1:nrows
fprintf(fileID,formatSpec,B{row,:}); %輸出文件
end
type Ly1.txt %預覽文件
fclose(fileID); %關閉fopen