R : Making a Proportional Stacked Bar Graph