https://researchdatapod.com/how-to-remove-legend-in-ggplot2/