如何绘制广义加性模型的样条曲线？

Question

是否可以使用 R 绘制 gam 的缩放样条基数，如下图所示？

缩放 B 样条：

谢谢。