Ggplot показывает значение r в квадрате на графике

Регрессия R в квадрате в r с помощью ggplot

    + geom_smooth(method=lm, se=F) +
    stat_poly_eq(formula = my.formula, 
                 aes(label = paste(..eq.label.., ..rr.label.., sep = "~~~")), 
                 parse = T)