title: Method to extract stat_smooth line fit
body: <p>Is there a way to extract the values of the fitted line returned from stat_smooth?</p>
  
  <p>The code I am using looks like this:</p>
  
  <pre><code>p &lt;- ggplot(df1, aes(x=Days, y= Qty,group=Category,color=Category))
  p &lt;- p + stat_smooth(method=glm, fullrange=TRUE)+ geom_point())
  </code></pre>
  
  <p>This new r user would greatly appreciate any guidance.</p>