options ls=78; title 'Cluster Analysis - Woodyard Hammock - Avergage Linkage'; data wood; infile 'D:\Statistics\STAT 505\data\wood.txt'; input x y acerub carcar carcor cargla cercan corflo faggra frapen ileopa liqsty lirtul maggra magvir morrub nyssyl osmame ostvir oxyarb pingla pintae pruser quealb quehem quenig quemic queshu quevir symtin ulmala araspi cyrrac; ident=_n_; drop acerub carcor cargla cercan frapen lirtul magvir morrub osmame pintae pruser quealb quehem queshu quevir ulmala araspi cyrrac; run; proc sort; by ident; proc cluster method=average outtree=clust1; var carcar corflo faggra ileopa liqsty maggra nyssyl ostvir oxyarb pingla quenig quemic symtin; id ident; run; proc tree horizontal nclusters=6 out=clust2; id ident; run;