Is there a way to extract the values of the fitted line returned from stat_smooth? The code I am using looks like this: p <- ggplot(df1, aes(x=Days, y= Qty,group=Category,color=Category)) p &l...