%let name=MnM; filename odsout '.'; data my_data; length mnm_color $10; input mnm_color count; datalines; Blue 102 Green 99 Red 86 Orange 73 Yellow 54 Brown 77 ; run; proc sql; select sum(count) into :total_count separated by ' ' from my_data; quit; run; data anno_percent; set my_data; xsys='2'; ysys='2'; hsys='3'; when='a'; midpoint=mnm_color; y=count; function='label'; position='8'; style='albany amt'; cbox='grayee'; text='a0'x||trim(left(put((count/&total_count),percent7.1)))||'a0'x; run; data anno_total; xsys='1'; ysys='1'; hsys='3'; when='a'; x=78; y=93; function='label'; style='albany amt'; position='5'; size=3.5; text='n = '||trim(left("&total_count")); output; run; goptions device=png; goptions xpixels=600 ypixels=450; goptions noborder; ODS LISTING CLOSE; ODS HTML path=odsout body="&name..htm" (title="Frequency of Colors in an M&M Packet") style=htmlblue; goptions ftitle="albany amt/bold" ftext="albany amt/bold" gunit=pct htitle=5.0 htext=3; goptions ctitle=gray33 ctext=gray33; axis1 label=(font='albany amt' 'Count') style=0 order=(0 to 120 by 20) major=none minor=none value=(font='albany amt' /*t=1 '' t=7 ''*/) offset=(0,0); axis2 label=none offset=(9,9); pattern1 v=s c=cx4cbbe6; pattern2 v=s c=cx5d242a; pattern3 v=s c=cx74e059; pattern4 v=s c=cxfbb635; pattern5 v=s c=cxd22515; pattern6 v=s c=cxf4f25f; title1 ls=2.0 "Frequency of Colors in an M&M Packet"; title2 a=-90 h=3pct " "; footnote1 h=1pct " "; proc gchart data=my_data; vbar mnm_color / descending type=sum sumvar=count subgroup=mnm_color nolegend outside=sum raxis=axis1 maxis=axis2 noframe autoref cref=graycc clipref coutline=gray99 space=5 name='mm'; run; axis1 label=(font='albany amt' 'Count') style=0 order=(0 to 120 by 20) major=none minor=none value=(font='albany amt' t=1 '' t=7 '') offset=(0,0); axis2 label=none offset=(9,9); title1 ls=2.0 "Frequency of Colors in an M&M Packet"; title2 a=-90 h=3pct " "; footnote1 h=1pct " "; pattern1 v=s c=cx4cbbe6; pattern2 v=s c=cx5d242a; pattern3 v=s c=cx74e059; pattern4 v=s c=cxfbb635; pattern5 v=s c=cxd22515; pattern6 v=s c=cxf4f25f; proc gchart data=my_data anno=anno_total; vbar mnm_color / descending type=sum sumvar=count subgroup=mnm_color nolegend outside=sum raxis=axis1 maxis=axis2 noframe coutline=gray99 space=5 autoref cref=graycc clipref anno=anno_percent des='' name="&name"; run; quit; ODS HTML CLOSE; ODS LISTING;