ods html close;
%let gpath=C:\;
%let w=5in;
%let h=3in;
%let dpi=200;
ods listing gpath="&gpath" image_dpi=&dpi;

ods html close;
ods listing gpath=&gpath image_dpi=&dpi;

data weather;
  input Month $ High Low Precip;
  Mean=(high+low)/2;
  label high= 'High(F)';
  label low = 'Low(F)';
  label precip= 'Precipitation (in)';
  label mean='Temperature';
  format high low 2.0;
  datalines; 
Jan    49   30  4.46
Feb    53   32  3.53
Mar    61   40  4.46
Apr    71   48  2.98
May    78   57  4.03
Jun    84   65  4.06
Jul    88   69  4.35
Aug    86   68  4.30
Sep    80   62  4.27
Oct    70   49  3.28
Nov    61   42  3.06
Dec    52   33  3.25
;
run;

/*--Format--*/
proc format;
   value temp
     30-<50 = 'Cold'
	 50-<70 = 'Mild'
	 70-<90 = 'Warm'
	 90-<110 = 'Hot'
	 run;
  
/*--Create transparent image annotation data set in GRAPHPERCENT--*/
data annoImage;
  length function $10;
  function='image'; height=100; width=100; transparency=0.4; drawspace='GraphPercent';
  image="C:\Rainbow.png"; layer='back'; output;
run;

 /*--Weather Image Title--*/
ods listing style=default;
 ods graphics / reset width=5in height=3in imagename='Weather_Image';
 title 'Average Monthly Temperature';
 proc sgplot data=weather  nowall noborder sganno=annoImage pad=0;
   format mean temp.;
   styleattrs datacolors=('lightblue' 'yellow' 'orange' 'red');
   highlow x=month low=low high=high / type=bar group=mean name='h'
           lineattrs=graphoutlines dataskin=matte fillattrs=(transparency=0);
   xaxis display=(nolabel noline noticks);
   yaxis display=(nolabel noline noticks) grid offsetmax=0.1;
   keylegend 'h' / noopaque noborder fillheight=14 fillaspect=golden;
   run;
title;