options ls=78; title "Bartlett's Test - Pottery Data"; data pottery; infile "D:\Statistics\STAT 505\data\pottery.txt"; input site $ al fe mg ca na; run; proc discrim pool=test; class site; var al fe mg ca na; run;