Итак, я строю графики некоторых данных и получаю сглаженную кривую, используя geom_smooth. Как я могу отобразить уравнение, которое geom_smooth использует на графике - я нашел решения для линейных данных, но не для синусоидальных данных - и, возможно, также значение r ^ 2.
ggplot(all_year_month_eng_wth,aes(x = year_month, y=energy_sum_mean,colour="Energy Cons.",group=1)) +
geom_line()+
geom_point()+
geom_smooth(method="lm", formula=y~cos(2*pi*x/12) + sin(2*pi*x/12)) +
theme(legend.position = c(0.8,0.9),axis.text.x = element_text(angle = 90,hjust = 1))