%galtonalw.m
%needs stuartmaxwell.m
 clear all
 close all force

  disp('Galton amd ALW Features in Fingerprints')
  lw = 2; 
  set(0, 'DefaultAxesFontSize', 14);
  fs = 14;
  msize = 10;     
  
 indeppairs = [5  12 8;  8 18 8; 9 22 13];
 fratpairs = [5 12 2; 4 42 15; 1 14 10];
   [chi21, pval1] = stuartmaxwell(indeppairs)
   %chi21 = 7.0883
   %pval1 = 0.0289
   [chi22, pval2] = stuartmaxwell(fratpairs) 
   %chi22 = 4.2738
   %pval2 = 0.1180

   
   
   
   