close all
clear all
 disp('Exercise 2.15. Limestone')
  lw = 2; 
  set(0, 'DefaultAxesFontSize', 16);
  fs = 16;
  msize = 10;


load 'C:\BESTAT\Descriptive\Descriptivedat\limestone.dat'
% data set contains 18  6-dimensional measurements
glyphplot(limestone,'glyph','face','grid',[3, 6])
%print -depsc 'C:\Springer\Descriptive\Descriptiveeps\limestone.eps'