* Programmer: <Type in YOUR name here> ;

data healthy;
	infile 'h:health.dat';
/* Don't forget to change the infile above to point to your health.dat file location */
	input id 1-4  name $ 6-23 team $ 25-30  stwgt 32-34 
	endwgt 36-38 sex $ 40 age 42-43 height 45-46;
	loss = stwgt - endwgt;

proc print;
	title 'Programmer: <Type YOUR name Here>';
	title3 "Skinny's Health Club";
	title5 '2005 Statistics';
run;

proc print;
	var name sex age stwgt endgwgt height;
	title2 'Listing out only certain Columns';
	footnote '2005';
	footnote2 'Study Results';
run;

proc print;
   	var name age sex height;
	title2 'Using Certain Variables';
	footnote;
run;

proc print;
	where sex = 'F' & height >= 66 and stwgt >= 150;
	var name sex height stwgt;
	title2 'Use of the Where option in a print statement';
run;

data male;
	set healthy;
	if sex = "M" and team = "YELLOW";

proc print;
	title2 'Members who are Males on the YELLOW team';
run;