曲线平滑

Question

我正在使用以下命令从csv文件中绘制具有时序线图的数据：

library(ggplot2)  
library(reshape2)  

meltdf <- melt(AIB,id="Time")

ggplot(meltdf,aes(x=Time,y=value,colour=variable,group=variable),
lwd=10) + geom_line(size=2) + geom_smooth(method="gam", formula =y~s(x), se=FALSE) + geom_point(size=3)

我想做以下事情：

1. 更改平滑方法，要使用B样条曲线平滑。
2. 删除不平滑的线，只想保持平滑的曲线。

请建议我执行上述操作。