https://www.rstudiodatalab.com/2023/12/how-to-use-scale-color-manual-in-r.html