Decrease Legend Size Ggplot2 In R Code For Regression In R