ridge.cv()在parcor包装设计只是目的.
以下是手册中的示例:
> n<-100 # number of observations
> p<-60 # number of variables
> X<-matrix(rnorm(n*p),ncol=p)
> y<-rnorm(n)
> ridge.object<-ridge.cv(X,y)
> ridge.object
$intercept
0.01146743
$coefficients
X1 X2 X3 X4 X5 X6 X7
1.709387e-02 4.833916e-03 3.954463e-03 -9.671448e-03 4.507962e-03 -6.370366e-03 -4.655737e-02
...
X57 X58 X59 X60
-2.119606e-03 -1.229390e-04 -1.912877e-03 -1.833788e-02
$lambda.opt
[1] 540
Run Code Online (Sandbox Code Playgroud)
这里,$lambda.opt是使用十倍交叉验证获得的正则化参数的最佳值.