add_glyph_legend function

Add Legend Layer to a ggplot