无法预测 R 的 GLMNET 包中的拟合模型答案

【问题标题】：Trouble with predicting a fitted model in R's GLMNET package无法预测 R 的 GLMNET 包中的拟合模型
【发布时间】：2014-03-15 22:13:42
【问题描述】：

我试图通过使用 R 的 glmnet 包中的岭回归来根据多个变量预测汽车的 mpg。我已经将数据分为训练数据和测试数据，并对分类变量进行了虚拟编码。

我拟合了一个交叉验证模型如下：

require("glmnet")

x <- as.matrix(data.frame(cylinderDummy[,2:ncol(cylinderDummy)], trainData$displacement,
            trainData$horsepower, trainData$weight, trainData$acceleration,
            originDummy[,2:ncol(originDummy)]))
y <- trainData$mpg
cv.fit <- cv.glmnet(x, y, alpha = 1, nfolds=5,type.measure="mse")

这一切都很好，但是，当我尝试对拟合模型的测试数据使用 predict() 函数时，就会出现问题：

prediction <- predict(cv.fit, testData$mpg, s="lambda.1se")

我收到以下错误：

Error in as.matrix(cbind2(1, newx) %*% nbeta) : 
error in evaluating the argument 'x' in selecting a method for function 'as.matrix': 
Error in t(.Call(Csparse_dense_crossprod, y, t(x))) : 
error in evaluating the argument 'x' in selecting a method for function 't': 
Error: Cholmod error 'X and/or Y have wrong dimensions' at file
../MatrixOps/cholmod_sdmult.c, line 90

谁能告诉我我做错了什么？谢谢！

【问题讨论】：

标签： r machine-learning statistics regression glmnet

【解决方案1】：

prediction <- predict(cv.fit, testData$mpg, s="lambda.1se")

似乎testData$mpg是一个向量，模型应该使用整个testdata集来预测而不是单个mpg值。

在你的情况下，它应该是这样的

testdata <- as.matrix(data.frame(cylinderDummy[,2:ncol(cylinderDummy)], testData$displacement,
        testData$horsepower, testData$weight, testData$acceleration,
        originDummy[,2:ncol(originDummy)]))
prediction <- predict(cv.fit, testData, s="lambda.1se")

【讨论】：