Update SplinesCode.r