How to Add a Colored Bar to the Side of a Plot Based on the Levels of a Factor in ggplot2