%% txt文本数据中空格改成逗号代码实现
clear
clc
close all
% 原始数据所在路径
orgpath = 'E:\database\\';
% 查看数据列表
filelistName = 'filelist.txt';
filelist = strcat(orgpath,filelistName);
fidfile = fopen(filelist,'r');
if fidfile < 0
error('数据文件名打开错误');
end
% 结果所在路径
respath = 'E:\database1\';
tline = fgetl(fidfile);
fileno = 0;
while ischar(tline)
rname = strtrim(tline);
if (1 == strncmp(rname,'#',1))
tline = fgetl(fidfile);
continue;
end
fileno = fileno + 1;
loadtxt = strcat(orgpath,rname,'.txt');
lt = load(loadtxt);
createtxt = strcat(respath,rname,'.txt');
fid = fopen(createtxt,'w');
for i = 1:length(lt)
fprintf(fid,'%d,%d,%d,%d,%d\n',lt(i,1),lt(i,2),lt(i,3),lt(i,4),lt(i,5));
end
fclose(fid);
%% 读入下一条数据
tline = fgetl(fidfile);
close all
end
fclose(fidfile);