* BarChart Example
  Create a barchart using sgplot
  Graph favorite chocolate flavors by age.
  Ref: The Little SAS Book, p. 231;

data chocolate;
   input AgeGroup $ FavoriteFlavor $ @@;
   datalines;
A Pear A 80%Cacao A EarlGrey C 80%Cacao A Ginger C Pear
C 80%Cacao C Pear C Pear A EarlGrey A 80%Cacao C 80%Cacao
A Ginger A Pear C EarlGrey C 80%Cacao A 80%Cacao A EarlGrey
A 80%Cacao C Pear C Pear A 80%Cacao C Pear C 80%Cacao
;

proc format;
   value $AgeGp 'A' = 'Adult' 'C' = 'Child';

* Bar chart for favorite flavor;
proc sgplot data = chocolate;
   vbar FavoriteFlavor / group = AgeGroup groupdisplay = cluster;
   format AgeGroup $AgeGp.;   
   label FavoriteFlavor = 'Flavor of Chocolate';
   title 'Favorite Chocolate Flavors by Age';

run;
quit;