% The program rotation_ex displays six rotation examples

clf

a=[0.4 1/17 0.31 0.812 0.20246837 0.20246837];
n=[5 20 100 250 10000 20];

for i=1:6,
  subplot(3,2,2*mod(i-1,3)+1+fix((i-1)/3))
  rotation(a(i),n(i));
end

title('The first 20 points','fontsize',12);

subplot(3,2,1)

title('rotation\_ex.m','fontsize',12);