R Q:mgcv:：gam（）在系数上具有约束

我正在拟合一个logit-GAM模型，需要对beta的平滑项施加一个不等式约束。我尝试过mgcv:：pcls（），但似乎无法指定不同样条曲线系数的独立不等式。实现这一目标的推荐方法是什么？

我自己找到了答案，并将其发布，以防有人会找到它。mgcv中的Mono.con函数生成约束矩阵Ain和bin。对于多条样条曲线，Ain矩阵应该放在一起形成一个块对角矩阵