r - R 平滑函数返回错误“模型的系数比数据多”

Question

当我尝试在 gam 函数中使用平滑函数时遇到错误。我的数据集有 7 行，9 个预测变量。这是我的代码。

y1=unlist(data1[11:17,2])

v1=unlist(data1[11:17,4])
v2=unlist(data1[11:17,5])
v3=unlist(data1[11:17,6])
v4=unlist(data1[11:17,7])
v5=unlist(data1[11:17,9])
v6=unlist(data1[11:17,10])
v7=unlist(data1[11:17,11])
v8=unlist(data1[11:17,12])
v9=unlist(data1[11:17,17])

xynew=data1

out1=gam(y1~s(v1,bs="cs",k=3)+v2+v3+v4+v5+v6+v7+v8+v9)
out2=gam(y1~v1+s(v2,bs="cs",k=3)+v3+v4+v5+v6+v7+v8+v9)
out3=gam(y1~v1+v2+s(v3,bs="cs",k=3)+v4+v5+v6+v7+v8+v9)
out4=gam(y1~v1+v2+v3+s(v4,bs="cs",k=3)+v5+v6+v7+v8+v9)
out5=gam(y1~v1+v2+v3+v4+s(v5,bs="cs",k=3)+v6+v7+v8+v9)
out6=gam(y1~v1+v2+v3+v4+v5+s(v6,bs="cs",k=3)+v7+v8+v9)
out7=gam(y1~v1+v2+v3+v4+v5+v6+s(v7,bs="cs",k=3)+v8+v9)
out8=gam(y1~v1+v2+v3+v4+v5+v6+v7+s(v8,bs="cs",k=3)+v9)
out9=gam(y1~v1+v2+v3+v4+v5+v6+v7+v8+s(v9,bs="cs",k=3))

这是我要回来的错误

Model has more coefficients than data

这是我第一次在 R 中进行数据分析和预测编码，所以如果你们中的任何人能帮助我解决这个问题，那将意义重大。

非常感谢您的时间和帮助。

标签： r