套索回归 R - X 折叠 1：内部：...：找不到对象“eval_safely”

编程问答 2022-05-10

问题描述

我正在尝试进行套索回归。它以前在我的 R 环境中工作过，但现在我得到一个错误：x Fold1: internal: Error in mapply(FUN = eval_safely,calls,names(calls),SIMPLIFY = FALSE,: object 'eval_safely' not found

# Create a recipe
lr_mod_recipe <- recipe(Lead_week ~ .,data = Data_train) %>%
                        step_normalize(Meterdistance) %>%
                        step_dummy(all_nominal(),-all_outcomes()) 


# Specify the model
lasso_lr <- linear_reg(penalty = tune(),mixture = 1) %>%
  set_engine("glmnet")
# mixture = 1 is lasso,mixture = 0 is ridge


# Create a workflow
lr_mod_workflow <-  workflow() %>%
  add_model(lasso_lr) %>%
  add_recipe(lr_mod_recipe) 
lr_mod_workflow

# Set tuning grid
grid_lasso <- tibble(penalty = 10^(seq(from = -3,to = 1,length.out = 100)))
grid_lasso

lasso_tune <- lr_mod_workflow %>%
  tune_grid(resamples = cv_folds,grid = grid_lasso,metrics = class_metrics)

我在尝试执行我的最后一个块后收到此错误。我不知道是什么问题，更令我惊讶的是我的套索回归以前可以工作，但由于出现此错误，我现在无法工作。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

lasso-regressionpredictionrr