data work.disper7b;
set zone7b.pollen;
length BarDrill $ 40;
if pollentype='GRASS' then bardrill='HREF="grass7b.html"';
if pollentype='WEED' then bardrill='HREF="weed7b.html"';
if pollentype='TREE' then bardrill='HREF="tree7b.html"';
run;
ods listing close;
ods html path='c:\data\pollen\html' body='sources.html';
goptions device=gif xpixels=360 ypixels=240;
title 'Pollen Counts by Type';
proc gchart data=work.disper7b;
hbar month / sumvar=count group=pollentype
html=bardrill discrete;
run;
ods html body='typetables.html';
title 'Pollen Sources by Month';
proc tabulate data=work.disper7b;
class month pollentype;
var count;
table month*pollentype, sum*count;
run;
ods html anchor='grassbyweek';
title 'Grass Pollen by Week';
proc tabulate data=work.disper7b;
class week;
var count;
table week, sum*count;
where pollentype='GRASS';
run;
quit;
ods html close;
ods listing;
|
