如何解决从 glmnet 的 tidymodel 实现中获取拟合值
我正在使用 glmnet 引擎在 tidymodels 中执行弹性网络线性回归。
如果我直接在 glmnet 中运行它,我可以做这样的事情:
cv_fit <- cv.glmnet(
y = response_vec,x = predictor_matrix,nfolds = 10,alpha = 0.95,type.measure = "mse",keep = TRUE)
然后我可以得到这样的拟合值:
fitted_y <- cv_fit$fit.preval
但是,我找不到如何获得使用欧洲防风草拟合的 glmnet 模型的拟合值/残差。任何帮助表示赞赏。
解决方法
我正在寻找的是 control
参数。 save_pred = TRUE
确保拟合值存储在返回的对象中:
tuning_mod <- wf %>%
tune::tune_grid(
resample = rsample::vfold_cv(data = my_data,v = 10,repeats = 3),grid = dials::grid_regular(x = dials::penalty(),levels = 200),metrics = yardstick::metric_set(yardstick::rmse,yardstick::rsq),control = control_resamples(save_pred = TRUE)
)
tune::collect_predictions(tuning_mod)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。