data ex;input   x1-x4 g @@;
cards;
245	134	0.1	0.4	 1
200	167	0.12	0.27	2
170	150	0.07	0.08	2
100	167	0.2	0.14	3
255	125	0.07	0.14	1
130	100	0.06	0.12	3
120	133	0.1	0.26	3
160	100	0.05	0.1	3
185	115	0.05	0.19	2
170	125	0.06	0.04	2
165	142	0.05	0.03	2
100	117	0.07	0.02	3

;
data ex1;input x1-x4 @@;
cards;
228 134 0.20 0.11
180 117 0.07 0.06
135 108 0.02 0.12
210 142 0.10 0.08
180 120 0.08 0.21
150 130 0.05 0.14
;
proc discrim data=ex testdata=ex1
anova manova simple list testout=ex2;
class g;
proc print data=ex2;run;