* Some examples of how SAS graphics have changed over the years;

data hsb2;
input  id female race ses prog read write math science socst;
datalines;
 70 0 4 1 1 57 52 41 47 57
121 1 4 2 3 68 59 53 63 61
 86 0 4 3 1 44 33 54 58 31
141 0 4 3 3 63 44 47 53 56
172 0 4 2 2 47 52 57 53 61
113 1 4 2 2 44 52 51 63 61
 50 0 3 2 1 50 59 42 53 61
 11 0 1 2 2 34 46 45 39 36
 84 0 4 2 1 63 57 54 51 63
 48 1 3 2 2 57 55 52 50 51
 75 1 4 2 3 60 46 51 53 61
 60 1 4 2 2 57 65 51 63 61
 95 0 4 3 2 73 60 71 61 71
104 0 4 3 2 54 63 57 55 46
 38 0 3 1 2 45 57 50 31 56
115 0 4 1 1 42 49 43 50 56
 76 0 4 3 2 47 52 51 50 56
195 0 4 2 1 57 57 60 56 52
;
run;

* OLD SCHOOL:  proc plot;

PROC PLOT data=hsb2;
PLOT read*math;
run;

PROC PLOT data=hsb2;
PLOT read*math='*' write*math='o' / overlay;
run;

PROC PLOT data=hsb2;
PLOT read*math=ses;
run;

PROC CHART data=hsb2;
PIE ses;
VBAR ses;
run;

* A little better:  PROC GPLOT;

PROC GPLOT data=hsb2;
PLOT read*math;
run;

PROC GPLOT data=hsb2;
PLOT read*math='*' write*math='o' / overlay;
run;

PROC GPLOT data=hsb2;
PLOT read*math=ses;
run;

PROC GCHART data=hsb2;
PIE ses;
VBAR ses;
run;

* Much more modern:  PROC SGPLOT;

PROC SGPLOT data=hsb2;
SCATTER y=read x=math;
run;

PROC SGPLOT DATA = hsb2;	
  scatter x=math y=read;
  scatter x=math y=write;
run;

PROC SGPLOT DATA = hsb2;
  scatter x=math y=read / group=ses;
run;

PROC SGPLOT DATA = hsb2;
 VBAR ses;
 LABEL ses="Socioeconomic Status";
run;