DataImport(samples, valid, data)

function datasets =  DataImport(samples, valid, data)

datasets = data;

numSampleType = 1 + ~strcmp(samples{2}, ''); % number of sample dataset types are 2: training and classify datasets
for i = 1:numSampleType
    if ~valid(i) 
        
        openMessageStr = sprintf('Open %s input data file in ', samples{i});
        writeMessageStr = sprintf('Write the %s input data file name', samples{i});
        
        [option,ok]=listdlg('PromptString','Select an option', 'ListString',{strcat(openMessageStr, ' data directory'), strcat(openMessageStr, ' alternative directory')},...
                'SelectionMode','single','ListSize',[250 150],'Name','Selection List');
            
        datasets{i} = {};
		if option == 1
            fileName = inputdlg(writeMessageStr,'Select file',1,{'data.dat'});
            datasets{i} = load(strcat('Data\',fileName{1}));
		elseif option == 2
            dirStr = 'C:\Programas\MatLab\work\Discriminant Analysis Programme\Data\data.dat';
            [fileName,pathName] = uigetfile({'*.dat';'*.txt';'*.m';'*.mdl';'*.mat';'*.*'},'Select an input data file', dirStr);
            datasets{i} = load(fullfile(pathName, fileName));
		else
            warndlg('No option selected','ATTENTION')
		end
    end
end