randomset1(tot,nel)

function ranset = randomset1(tot,nel)

% This function is called if not all (p+1)-subsets out of n will be 
% considered. It randomly draws a subsample of nel cases out of tot.      

ranper=randperm(tot);
ranset=ranper(1:nel);

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