% LMcs140501_4th.m
% Case Study 14.5.1
% Base running example from Hollander & Wolfe
% From Larsen & Marx (2006) Introduction to Mathematical Statistics, 4th ed
% Written by Eugene.Gallagher@umb.edu 2/16/11.
% 
DATA=[5.5 5.55
    5.7 5.75
    5.6 5.5
    5.5 5.4
    5.85 5.7
    5.55 5.6
    5.4 5.35
    5.5 5.35
    5.15 5
    5.8 5.7
    5.2 5.1
    5.55 5.45
    5.35 5.45
    5 4.95
    5.5 5.4
    5.55 5.5
    5.55 5.35
    5.5 5.55
    5.45 5.25
    5.6 5.4
    5.65 5.55
    6.3 6.25];
plot(DATA');
ax1=gca;
set(ax1,'Xtick',[1 2])
set(ax1,'XtickLabel',{'Narrow-Angle','Wide-Angle'}) 

figure(gcf);pause
[P,TABLE,STATS]=friedman(DATA);
