% SEPT. 4, 2009
% MANDIBLE.DAT PLOT
% AUG. 24, 2009
clear all;
[data,vname,cname] = tblread('mandible.dat',';');
figure(1);
andrewsplot(data);
figure(2);
glyphplot(data);
figure(3);
glyphplot(data,'Glyph','face');
figure(4);
boxplot(data);
figure(5);
gplotmatrix(data);
figure(6);
dogs1 =  {'chien moderne'; 'chacal dore'; ...
	       'loup chinois';'loup indien'; ' cuon';'dingo';'chien prehist.'};
dogs2={'d1';'d2';'d3';'d4';'d5';'d6';'d7'};
sym='0+x*0+x';
gscatter(data(:,1),data(:,2),dogs1,sym);