/* Lesson 6-5 */
 /*    File Name = corr01.sas   11/15/96   */

data zenin;
  infile 'all.dat';
  input seibetsu $ shintyou taijyuu kyoui kozukai jitaku $ daigaku $;

proc print data=zenin(obs=10);
run;
proc corr data=zenin;
  var shintyou taijyuu kyoui;
run;

prov sort data=zenin;
  by seibetsu;
run;
proc corr data=zenin;
  var shintyou taijyuu kyoui;
  by seibetsu;
run;