Sort the data set for the graphs of leading producers of each grain type.


proc sort data=grainldr out=type;
by type;
run;