library(lars)

data <- as.matrix(data)

SRE实战 互联网时代守护先锋，助力企业售后服务体系运筹帷幄！一键直达领取阿里云限量特价优惠。

out2 <- lars(x=data[,1:13],y=data[,14],type ="lar")

 

summary(out2)

 

Cp的含义：衡量多重共线性，其取值越小越好，这里取到第6步使得Cp值最小，也就是选择X7,X3,X5,X11,X6,X10 这6个变量。

#确定Cp值最小的步数

coef <- coef.lars(out2, mode="step", s=7)
coef[coef!=0]


---------------------
作者：liuzhilu
来源：CSDN
原文：https://blog.csdn.net/liuzhilu/article/details/80293102
版权声明：本文为博主原创文章，转载请附上博文链接！

扫码关注我们
微信号：SRE实战
拒绝背锅 运筹帷幄