/* Lesson 4-1 */
 /*    File Name = les0401.sas   05/18/00   */
options linesize=72 pagesize=20;

data kenshin;
  input name $ height weight;
cards;
  asakawa     156  44
  sakaguchi   165  58
  yano        157  43
  imamura     159  44
  esaka       162  44
  takahashi   159  59
;
proc print data=kenshin;
run;
proc means data=kenshin;
run;