求问代码！没学过，但对这个感兴趣，希望可以有代码来看看！
用R怎么做基函数为5阶B-样条基的曲线拟合，并用粗糙惩罚进行修匀。
再用拟合的曲线函数的一阶导数二阶导数做如下图所示的相平面图。