我正在尝试使用我的数据安装弹性网,很抱歉,我无法共享数据,因为它是客户数据。所以我写了下面的代码
model <- train(
LnSales_x ~., data = dataReg, method = "glmnet",
trControl = trainControl("cv", number = 10),
tuneLength = 10
)
model$bestTune
coeff=coef(model$finalModel, model$bestTune$lambda)
给我系数为
(Intercept) 12.37486303
LnPrice_x .
LnPrice_y .
LnPrice_x_comp1 .
LnPrice_x_comp2 .
LnPrice_x_comp3 0.07760043
LnPrice_x_comp4 -0.02451433
&model $ bestTune返回
alpha lambda
100 1 0.01407534
之后,我将tuneLength = 100更改为$ bestTune模型
alpha lambda
6264 0.8818182 0.02968187
给我系数为
(Intercept) 12.55749
LnPrice_x .
LnPrice_y .
LnPrice_x_comp1 .
LnPrice_x_comp2 .
LnPrice_x_comp3 .
LnPrice_x_comp4 .
您能建议我如何选择音长吗?
答案 0 :(得分:0)
我假设您使用的是r和插入号? Tunelength只是模型将使用的超参数组合的数量。您应该检查每个指标的指标(准确性,mse ...)以选择模型。