1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
function choice = ChooseKFromN(n,k,unique)
% choice = ChooseKFromN(n,k,[unique])
%
% Choose k distinct integers out of n. The indices come back in
% randomized order if unique is absent or 0. They come back
% sorted if unique is equal to 1.
%
% 4/11/94 dhb Wrote it.
% 2/8/98 dhb Renamed to avoid name conflict with Matlab 5 nchoosek.m
% dhb Eliminate obsolete call to rand('uniform').
% 7/24/04 awi Cosmetic.
% 1/29/05 dgp Cosmetic.
% Handle optional arg
if nargin == 2
unique = 0;
end
% Handle k > n case.
if k > n
k = n;
end
% Sort random numbers to get indices
[null,index] = sort(rand(n,1));
% Pull out first k
choice = index(1:k);
% If unique is set, return them sorted.
if unique
choice = sort(choice);
end
|
