TITLE 'YOUR NAME';
TITLE2 'IMPROVEMENT OF STARTING REACTION TIME IN SWIMMERS';
DM 'LOG; CLEAR; OUT; CLEAR;';
OPTIONS LS=75 PS=60 PAGENO=1;

DATA REACTION;
	/* DESCRIPTION OF VARIABLES (UNIT: MILLISECONDS)
	INITIAL: REACTION TIME (RT) BEFORE TRAINING PROGRAM
	FINAL: RT AFTER TRAINING PROGRAM
	TOTALIMP: TOTAL IMPROVEMENT IN RT
	WEEKIMP: AVERAGE WEEKLY IMPROVEMENT IN RT */
INPUT GENDER $ WEEKS INITIAL FINAL;
TOTALIMP=INITIAL-FINAL;
WEEKIMP=TOTALIMP/WEEKS;
CARDS;
F  6 361 364
F  6 318 316
F 12 347 325
F 12 338 317
F 18 302 266
F 18 356 317
M  6 313 312
M  6 328 330
M 12 299 280
M 12 366 342
M 18 320 283
M 18 339 297
RUN;
PROC PRINT;
RUN;
PROC PRINT NOOBS;
RUN;
QUIT;