存储了STONE数据为TXT格式

%%D:\zhuomian\kidney
clc
clear 
%批量读取一个文件夹txt数据
cell_type = 'pc';
namelist=dir('D:\zhuomian\kidney\*.txt');    
l=length(namelist);
for i=1:l
    file_name=strcat(['D:\zhuomian\kidney\',namelist(i).name]);
    Data{i}=textread(file_name);  
end
%% walet小波分解与重构
for i=1:l
    data = Data{i};   
    data1(i,:)=data(:,2);
    [s,coespec recspec] = walet(data(:,1),data(:,2));
    y1=recspec{5}+recspec{6}+recspec{7}+recspec{8}+recspec{9}+recspec{10}+recspec{11};
    data3(i,:)=y1;
end

output_folder = 'D:\processed_stonedata\'; % 目标文件夹路径

for i = 1:l
    % 构造输出文件路径和名称
    output_filename = strcat(output_folder, 'Processed_', namelist(i).name);

    % 检查文件是否存在并删除
     if exist(output_filename, 'file')
        delete(output_filename);
    end

    % 将第一列为原始数据的第一列，第二列为 data3 的第 i 行
    output_data = [data(:,1), data3(i,:)']; 
    dlmwrite(output_filename, output_data, 'delimiter', '\t'); % 使用制表符分隔符写入
end

首先要先创建存储的目标文件夹，执行检查文件是否存在，可以在修改代码运行后改变相应的目标文件夹中的数据。再将数据进行进一步操作