请教大神~~~
请问如何适用ggplot2画出平滑曲线（不是趋势线）？

目前使用如下代码：
ggplot(f,aes(x=TI,y=RAIN,colour=MODEL,group=MODEL))+geom_line()

可以画到这步：

但是是想画成这样：

请问该使用什么样的方法？

这里是想作一个经过各个点的平滑的线条，而geom_smooth()是作趋势线，结果是不一样的...

附数据框f的内容如下：
f   TI MODEL     RAIN
1   1   obs  87.0000
2   2   obs  81.4000
3   3   obs  66.7000
4   4   obs  95.4000
5   5   obs 113.0000
6   6   obs 158.0000
7   7   obs 144.0000
8   8   obs  99.3000
9   9   obs 120.0000
10 10   obs 106.0000
11 11   obs 227.0000
12 12   obs 216.0000
13 13   obs 145.0000
14 14   obs 102.0000
15 15   obs  80.4000
16  1   xaj  86.9100
17  2   xaj  80.7820
18  3   xaj  75.5590
19  4   xaj  85.7992
20  5   xaj 114.4260
21  6   xaj 149.0000
22  7   xaj 119.0000
23  8   xaj  94.0000
24  9   xaj  94.0878
25 10   xaj 197.5330
26 11   xaj 226.8930
27 12   xaj 186.8540
28 13   xaj 150.6130
29 14   xaj 125.8750
30 15   xaj 110.6300
31  1    rr  86.9100
32  2    rr  86.8200
33  3    rr  86.7300
34  4    rr  88.2300
35  5    rr 108.4100
36  6    rr 133.8200
37  7    rr 127.1400
38  8    rr 109.7900
39  9    rr 114.0700
40 10    rr 112.8200
41 11    rr 206.4500
42 12    rr 204.2200
43 13    rr 153.8500
44 14    rr 124.6200
45 15    rr 114.3000