* DoubleAxis Example. Use SAS/GRAPH.

  Use gplot to plot temperatures with two vertical 
  axes, one for Celsius and one for Fahrenheit;

data temperatures;
   input date DATE9. +1 ctemp 2.;
   ftemp = 9 * ctemp / 5 + 32;
   label ctemp='Celsius Temperature'
         ftemp='Fahrenheit Temperature';
   datalines;
01jan2010  5
01feb2010  6
01mar2010 10
01apr2010 14 
01may2010 16
01jun2010 20
01jul2010 23
01aug2010 23 
01sep2010 21
01oct2010 18
01nov2010 10
01dec2010  5 
;

goptions reset=all;
proc print;
   format date DATE9.;

proc gplot;
   title 'DoubleAxis Example';
   footnote 'Average Monthly Highs';
   axis1 order = '01jan2010'd to '01jan2011'd by qtr;
   axis2 order = 0 to 30 by 10;
   axis3 order = 32 to 86 by 18; 
   symbol1 h=1 v=none i=join c=black;
   symbol2 h=0.75 v=square i=none c=black;
   format date DATE7.;
   plot ctemp*date / haxis=axis1 vaxis=axis2 
      hminor=10 vminor=10; 
   plot2 ftemp*date / haxis=axis1 vaxis=axis3 
      hminor=10 vminor=10; 
 
run;
quit;