% FILENAME DES EXCELFILES
filename_xls = 'rach3_eeg_all.xlsx';

% FILENAME DES JS-FILES
filename_js = 'rach3_eeg_all.js';

%%%------------------------------------------------------------%%%

T = readtable(filename_xls);
Column_names = T.Properties.VariableNames;

f = fopen(filename_js, 'w');

for i=1:length(Column_names)
    fprintf(f, 'var ');
    fprintf(f, Column_names{i});
    fprintf(f, '_array = [');    
    
    for j = 1:height(T)
        cell_type = isa(T{:,i}, 'cell');
        double_type = isa(T{:,i}, 'double');
                
        if cell_type
            a = char(T{j,i});
            fprintf(f,"'");
            fprintf(f,a);
            
            if string(Column_names(i))=='pitch'
                index = find(contains(Column_names, 'frequency'));
                
                if not(isempty(index))
                    fprintf(f, ' (');
                    fprintf(f, '%.0f', table2array(T(j,index)));
                    fprintf(f, ' Hz)');
                end
            end
            
            fprintf(f,"'");
            
        elseif double_type
            b = table2array(T(j,i));
            if round(b)==b
                fprintf(f,'%.0f',b);
            else
                fprintf(f,'%.3f',b);
            end
        end
        
        if j<height(T)
            fprintf(f,', ');
        end
    end
    fprintf(f,'];\n');
end
fclose('all');