在predict.gam（mgcv）中使用“ micv”平滑函數時出錯

Question

在使用mgcv包預測GAM模型時，使用micv平滑函數（來自scam包）為協變量之一構建了GAM模型， mgcv出現以下錯誤：

Error in predict.gam(mod_gam, newdata = dfGAMDev) : 
  number of items to replace is not a multiple of replacement length

碼：

 library(dplyr)
 library(ggplot2)
 library(car)
 library(mgcv)
 library(scam)

mod_gam <- gam(Y ~  X1 +  X2+   X3+  s(X4, bs='micv') +  X5,  data = dfGAMDev )
predDevGAM <- predict(mod_gam, newdata =dfGAMDev)

我也嘗試了以下方法：

predDevGAM <- predict.gam(mod_gam, newdata =dfGAMDev)

所有變量都是數字

Answer 1

我一直在嘗試構建形狀不受約束的GAM模型，並使用不受約束的GAM模型函數gam代替scam函數。 以下代碼有效：

 mod_gam <- scam(Y ~  X1 +  X2+   X3+  s(X4, bs='micv') +  X5,  data = dfGAMDev)

提出問題很抱歉。 我誤解了，騙局包中的平滑函數可以在gam函數中使用