我正在使用稀疏组套索,这是一个惩罚回归。我使用的包是SGL。我试图在我的R中运行示例,代码如下所示
set.seed(1)
n = 50; p = 100; size.groups = 10
index <- ceiling(1:p / size.groups)
X = matrix(rnorm(n * p), ncol = p, nrow = n)
beta = (-2:2)
y = X[,1:5] %*% beta + 0.1*rnorm(n)
data = list(x = X, y = y)
cvFit = cvSGL(data, index, type = "linear")
我尝试提取cvFit
的回归系数,但结果是
coef(cvFit)
NULL
谁能告诉我有什么问题?提前谢谢。
答案 0 :(得分:0)
这从具有最小lambda值的模型中提取系数。
coef(fit,s=cvfit$lambda.min)