newgraph
  x_translate -3.5 y_translate -.7
  border
  xaxis min 0 max 1 size 3 nodraw
  yaxis min 0 max 1 size 3.7 nodraw
  newstring hjl vjt x .05 y 1 font Courier fontsize 7 linesep 5.1 : \
newgraph\
xaxis \
  size 3 min 0 max 41 \
  mhash 1 (* Put 1 tick between hash marks *)\
  hash_labels font Times-Italic\
  label : Qualifications...\
  \
yaxis \
  size 1.5 min 0\
  nodraw (* Don't draw the y-axis *)\
\
newcurve marktype ybar marksize 0 .6 fill .9\
  pts 41 4   35 3   17 2   14 1\
\
newstring \
  hjl vjc  (* These define justification *)\
  fontsize 9 \
  font Helvetica-Narrow \
  x 1 y 4 : Led league in wins\
\
(* Copystring copies the defaults *)\
copystring y 3 : Played for first place team\
copystring y 2 : Led league in ERA\
copystring y 1 : Led league in K's\
\
copystring x 42 y 4 : 41\
copystring x 36 y 3 : 35\
copystring x 18 y 2 : 17\
copystring x 15 y 1 : 14\
   \
newstring \
  hjr vjb \
  fontsize 6 \
  x 41 y 0.1 \
  : Source: USA Today research

newgraph
xaxis 
  size 3 min 0 max 41 
  mhash 1
  hash_labels font Times-Italic
  label : Qualifications of the 55 Cy Young winners\
who were starting pitchers
  
yaxis 
  size 1.5 min 0
  nodraw

newcurve marktype ybar marksize 0 .6 fill .9
  pts 41 4   35 3   17 2   14 1

newstring 
  hjl vjc  (* These define justification *)
  fontsize 9 
  font Helvetica-Narrow 
  x 1 y 4 : Led league in wins

(* Copystring copies the defaults *)
copystring y 3 : Played for first place team
copystring y 2 : Led league in ERA
copystring y 1 : Led league in K's

copystring x 42 y 4 : 41
copystring x 36 y 3 : 35
copystring x 18 y 2 : 17
copystring x 15 y 1 : 14
   
newstring 
  hjr vjb 
  fontsize 6 
  x 41 y 0.1 
  : Source: USA Today research