我在R（投影追踪回归）中的基本函数ppr（）上遇到困难。我想将相对于响应变量y的前两个脊函数绘制为二维表面，但是，plot函数仅分别绘制每个脊函数。
例如，
ppr1<-ppr(res[CPHF,13:43],res[CPHF,5],optlevel=3,nterms=2)
plot(ppr1) #Fits two independent ridge functions
predict(ppr1) #Only gives fitted values from first ridge function in the same way as: (ppr1$fitted.values)
我可以找到第二个脊函数的向量：
ppr1$alpha[,2]
但是，我找不到一种方法来提取此ridge函数的拟合值。我应该手动计算这些，还是有内置的方法来做到这一点？
谢谢！