套索回归-编码问题和使用语法寻求协助

Question

我正在尝试使用此页面中的以下代码进行Lasso回归https://www.rstatisticsblog.com/data-science-in-action/lasso-regression/

问题是我的r无法识别y-var[test]说找不到它。当我将其转换为确实需要的y-var[x-test]时，在此代码行之后，我会收到以下消息

cv_output <- cv.glmnet(x_vars[train,], y_var[train], 
            alpha = 1, lambda = lambda_seq)

storage.mode（y）中的错误

我在做什么错？

任何见解都会有所帮助。

Answer 1

您所引用的代码中有一些错别字/错误。我修复了其中一些，这对我有用：

library(glmnet)

# Loading the data
data(swiss)

x_vars <- model.matrix(Fertility~. , swiss)[,-1]
y_var <- swiss$Fertility
lambda_seq <- 10^seq(2, -2, by = -.1)

set.seed(86)
train <- sample(1:nrow(x_vars), floor(nrow(x_vars)/2))

cv_output <- cv.glmnet(x_vars[train,], y_var[train], 
                       alpha = 1, lambda = lambda_seq)

我仅收到有关grouped=FALSE的警告。