我想获得geom_smooth函数，以返回有关使用lm拟合的直线的坡度的信息。
请原谅术语使用不当，我不习惯编码，但是我需要学习作业。
我已经使用ggplot（）函数绘制了一个图形。数据按变量L分组，所以我有3行。当我使用geom_smooth时，我得到3个线性模型。我想要来自这三行中每行的数据系数和截距等。优选地，我希望它们也可以叠加到图上，但是它也不是很重要。
代码如下：
df <- read.table("....")
ggplot(df, aes(x = x, y = y, group = L))+
geom_point()+
geom_smooth(method = "lm")
该表仅包含3列变量x，y和l，在8行中具有3个L值。
在此先感谢您的帮助。