sourcecodes/bnt-master/KPMstats/test_dir.m


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

% # of sample points
n_samples = 1000;

p = ones(3,1)/3;

% Low Entropy
alpha = 0.5*p;

% High Entropy
%alpha = 10*p;

% draw n_samples random points from the 3-d dirichlet(alpha),
% and plot the results
points = zeros(3,n_samples);
for i = 1:n_samples
    points(:,i) = dirichletrnd(alpha);
end

scatter3(points(1,:)', points(2,:)', points(3,:)', 'r', '.', 'filled');