matlab_to_txt.m

function matlab_to_txt(groundTruthData)
% 功能：把matlab imageLabeler APP中的groundTruth变量导出到txt文本中，
% 每个图像对应一个txt。请自行选择导出文件夹。
%输入：
%      groundTruthData，groundTruth类型或table类型标注文件
%输出：无
%
%Example ; 
%            matlab_to_txt(groundTruthData)
%

if  ~istable(groundTruthData)&&~strcmpi(class(groundTruthData),'groundTruth')
    error('请在matlab imageLabeler APP中导出标注变量数据！');
end
if strcmpi(class(groundTruthData),'groundTruth')
    imageFilename = groundTruthData.DataSource.Source;
    classTable = groundTruthData.LabelData;
    mylabel = [cell2table(imageFilename),classTable];
else
    mylabel = groundTruthData;
end

folder_name = fileparts( mylabel.imageFilename{1});
imds = imageDatastore(folder_name,'FileExtensions',{'.jpg'});
imageNums = length(imds.Files);

numSamples = size(mylabel,1);
variableNames = mylabel.Properties.VariableNames;
numVariables = length(variableNames);

%% delete  unlabeled images and TXT
if imageNums>numSamples
    A = imds.Files;
    B = mylabel.imageFilename;
    Lia = ismember(A,B);
    removeFile = imds.Files(~Lia);
    for i = 1:size(removeFile,1)
        name = char(removeFile(i));
        name = name(1:end-4);
        delete([name,'.jpg']);
        delete([name,'.txt']);
    end
end

%% write
h = waitbar(0,'Please wait...');
steps = numSamples;
for i =1:numSamples
    rowTable = mylabel(i,:);
    [~,imagename,~] = fileparts(char(rowTable{1,1}));
    txtName = imagename;
    filename = fullfile(folder_name,[txtName,'.txt']);
    
    %%
    numROIs = 0;
    fid = fopen(filename,'w');
    fprintf(fid,'%2d\r\n',0);
    for j = 2:numVariables
        rects = [rowTable{1,j}];
        if iscell(rects)
            rects = cell2mat(rects);
        end
        for k = 1:size(rects,1)
            numROIs = numROIs+1;
            fprintf(fid,'%s %d %d %d %d  %d %d %d %d\r\n',variableNames{j},...
            round(rects(k,1:2)-1),round(rects(k,3:4)),zeros(1,4));
        end
    end
    fseek(fid, 0, 'bof');
    fprintf(fid,'%2d\r\n',numROIs); %写入ROI个数
    fclose(fid);
    waitbar(i / steps);
end
close(h)
warndlg('已覆盖到原有标注txt文件');