r - 从时间序列图中提取样条

Question

我有一个看起来像这样的数据：

>data(growth)
Year  Growth
<int> <dbl>
1  1952 0.947
2  1953 1.15 
3  1954 1.09 
4  1955 1.12 
5  1956 0.869
6  1957 1.12 
7  1958 1.22 
8  1959 0.973
9  1960 0.901
10  1961 1.03 

我想创建一个时间序列，然后在图上绘制一个“趋势平滑样条曲线”。我知道样条的代码是

p + stat_smooth(
color = "#FC4E07", fill = "#FC4E07",
method = "loess")

但是，我不知道如何从图中提取该样条（没有背景时间序列），然后将 4 个样条组合成一个图形？

非常感谢。

标签： rggplot2