% clc
% close all
% clear all

%% load mat file
% load results.mat
variable_name = hog_subset2;
%% open file for writing
fileID = fopen(strcat('hog_subset2','.arff'),'a');

% header
fprintf(fileID, '%% 1. Title: Geometrical Features of Binary Objects\n%%\n%% 2. Sources:\n');
fprintf(fileID, '%%      (a) Creator: - Andrzej Markiewicz\n');
fprintf(fileID, '%%      (b) Donor: - \n');
fprintf(fileID, '%%      (c) Date: July, 2014\n');

fprintf(fileID, '@RELATION hog_subset2\n\n');

for i = 1 : size(variable_name,2)-1
    fprintf(fileID, strcat('@ATTRIBUTE v_',num2str(i),'        NUMERIC\n'));
end
fprintf(fileID, '@ATTRIBUTE class        {1, 2, 3, 4, 5}\n\n');

% data
fprintf(fileID, '@DATA\n');

for i = 1 : size(variable_name,1)
    for j = 1 : size(variable_name,2)-1
        fprintf(fileID, '%.4f,', variable_name(i,j));
    end
    fprintf(fileID, '%d\n', variable_name(i,end));
end


% close file
fclose(fileID);