/* PATH 664 F05. CLASS EXAMPLE USING THE CHICKEN TRIALS.*/
DATA ANTIBIOTICS;
INPUT BIRD TRT $ INITIALWT WK2 WK4 WK6 WK8;
/* VARIABLE MODIFICATION -STATEMENTS. COMES AFTER INPUT STATEMENT. */
BWAVG=MEAN(OF INITIALWT WK2 WK4 WK6 WK8);
BWAVGLB=BWAVG*.0022;
/*IF INITIALWT<40 THEN GROUP=1;
IF INITIALWT>=40 THEN GROUP=2;
IF TRT=C THEN GROUP=3;
IF TRT=L THEN GROUP=4;
IF TRT=H THEN GROUP=5;
IF BIRD <=10 THEN GROUP=CONTROL;
IF BIRD >10,<=20 THEN GROUP=LOWANTIBIOTICS;
IF BIRD >21, <=30 THEN GROUP=HIGHANTIBIOTICS;*/
CARDS;
1		C	43	177	388	715	1223
2		C	40	182	450	801	1289
3		C	39	147	333	593	904
4		C	40	183	400	797	1244
5		C	35	152	338	592	1024
6		C	32	157	386	737	1260
7		C	33	162	376	751	1224	
8		C	38	176	419	795	1295
9		C	34	165	400	776	1295
10		C	37	176	425	785	1293
11		L	36	162	379	695	1130
12		L	38	168	407	801	1208
13		L	36	165	436	861	1340
14		L	41	147	353	695	1141
15		L	40	150	381	767	1252
16		L	38	167	375	683	1106
17		L	35	180	413	804	1295
18		L	35	161	377	760	1205
19		L	40	165	434	850	1244
20		L	36	178	390	787	1225
21		H	40	166	383	741	1250	
22		H	43	168	409	755	1087
23		H	43	172	413	850	1340
24		H	36	166	443	909	1377
25		H	41	169	437	874	1350
26		H	50	213	499	999	1491
27		H	38	184	469	906	1411
28		H	38	147	313	635	1073
29		H	38	181	432	811	1337
30		H	39	190	500	992	1480
;
RUN;
PROC PRINT DATA=ANTIBIOTICS;
RUN;
/*PROC SORT DATA=ANTIBIOTICS OUT=SORTANTIBIOTICS;
	BY TRT INITIALWT BWAVG;
		RUN;
PROC PRINT DATA= SORTANTIBIOTICS;
RUN;*/
PROC PLOT DATA=ANTIBIOTICS;
	PLOT BIRD*INITIALWT BIRD*WK8 TRT*INITIALWT;
RUN;
PROC MEANS MEAN STDEV STDERR;
RUN;
PROC TABULATE;
TITLE 'BODY WEIGHT - ANTIBIOTICS EFFECTS';
	CLASS TRT;
		VAR INITIALWT WK2 WK4 WK6 WK8 BWAVG ;
			TABLE TRT, INITIALWT*MEAN WK2*MEAN WK4*MEAN WK6*MEAN WK8*MEAN BWAVG*MEAN;
RUN;
/*PROC GLM;
	CLASS TRT;
		MODEL INITIALWT WK2 WK4 WK6 WK8 BWAVG = TRT;
			MEANS TRT/DUNCAN;
RUN;*/

PROC TTEST;
	CLASS TRT;
		MODEL BWAVG = TRT;
			
RUN;


QUIT;