function [Xtr,Ytr,Xtest,Ytest]=SelectDataSet(MLK,MLKP);

[Nvar,Nunit]=size(MLK.XMap);

if (upper(MLKP.ProblemType) == 'CLS')
    indx=0;
    for i=1:Nunit
        if (max(MLK.YMap(:,i)) >= MLKP.Threshold)
            indx=indx+1;
            Xtr(indx,:)=MLK.XMap(:,i)';
            Ytr(indx,:)=MLK.YMap(:,i)';
        end
    end
    Ytr = AssignClass(Ytr')';
else
    Xtr=MLK.XMap';
    Ytr=MLK.YMap';
end
Xtest=MLK.Xtest;
Ytest=MLK.Ytest;